: Re: How do I remove Nikkud (vowel marks) from a Word 2016 document? I am working on a commentary on Ethics of the Fathers and I want readers to be able to read sources I'm quoting in their

@Radia543

Vote Up Vote Down

In case your list is in Excel you could use this macro (based on the suggestion of Jonathan Potter). Select a range of cells, then execute the macro in VBEditor.

Sub HebrewDevocalizer()
Dim i As Integer

For i = 1425 To 1469
Selection.Replace What:=ChrW(i), Replacement:="", LookAt:=xlPart, _
SearchOrder:=xlByColumns, MatchCase:=False, SearchFormat:=False, ReplaceFormat:=False
Next i
For i = 1471 To 1474
Selection.Replace What:=ChrW(i), Replacement:="", LookAt:=xlPart, _
SearchOrder:=xlByColumns, MatchCase:=False
Next i
For i = 1476 To 1479
Selection.Replace What:=ChrW(i), Replacement:="", LookAt:=xlPart, _
SearchOrder:=xlByColumns, MatchCase:=False
Next i

End Sub

(0)

Login to post a comment!