diff --git a/Redaction/Validation.xba b/Redaction/Validation.xba index d2ba365..1e17055 100644 --- a/Redaction/Validation.xba +++ b/Redaction/Validation.xba @@ -1,6 +1,6 @@ -Sub markval19 +Sub markval20 End Sub @@ -145,7 +145,9 @@ End Function Private Sub removeBadCharacters StartTracking AskAndReplace("[\uE000-\uF8FF]+","") - AskAndReplace("(?<=DOI[0-9. /XVI:‒–—−ХOО?-]{1,50})[ХOО‒–—−]{1,5}","") + AskAndReplace("(?<=DOI[0-9. /XVI:‒–—−ХOО?-]{1,50})[Х]{1,5}","X") + AskAndReplace("(?<=DOI[0-9. /XVI:‒–—−ХOО?-]{1,50})[OО]{1,5}","0") + AskAndReplace("(?<=DOI[0-9. /XVI:‒–—−ХOО?-]{1,50})[‒–—−]{1,5}","-") StopTracking showTrackedChanges End Sub