text converted spontaneously into unintelligible symbols

  • Thread starter Thread starter Gadi
  • Start date Start date
G

Gadi

Hi,
some of my word2007 document was converted from hebrew into unintelligible
text, which I can't read obviously.
it looks like this:
ôúåâï ùðéåðé òí îàôééðéí ùì ôúåâï øàùåðé- ôéøåè áäîùê

what can I do? can I convert it back somehow?

thanks in advance,
Gadi
 
Gadi said:
Hi,
some of my word2007 document was converted from hebrew into unintelligible
text, which I can't read obviously.
it looks like this:
ôúåâï ùðéåðé òí îàôééðéí ùì ôúåâï øàùåðé- ôéøåè áäîùê

what can I do? can I convert it back somehow?

thanks in advance,
Gadi
Click to expand...

Make sure that the font being used is exactly the same one you used to
create those parts of the document, and that your language settings
are the same.
 
Hi Gadi,

I doubt that changing the font will restore your text, but you can run the
following macro from anywhere within your document to fix this. Note that it
sets all of the paragraphs in your document to right-to-left paragraphs. This
is necessary so that the word order of the converted text will appear correct.

The macro converts the unintelligible text that you provided to:
פתוגן שניוני ×¢× ×ž××¤×™×™× ×™× ×©×œ פתוגן ר×שוני- פירוט בהמשך
My rough translation of that would be: A secondary pathogen with
characteristics of a primary pathogen - details to follow

Sub ConvertBackToHebrew()
Dim i As Long
Dim num As Long
Dim char As String

With ActiveDocument
.Select
Selection.RtlPara
Selection.Collapse Direction:=wdCollapseEnd
For i = 1 To .Characters.Count
char = .Characters(i)
If AscW(char) >= &HE0 And AscW(char) <= &HFF Then
num = AscW(char) + &H4F0
.Characters(i) = ChrW(num)
End If
Next
End With
End Sub
 
Back
Top