Website Upgrade Incoming - we're working on a new look (and speed!) standby while we deliver the project

Tips on using this forum..

(1) Explain your problem, don't simply post "This isn't working". What were you doing when you faced the problem? What have you tried to resolve - did you look for a solution using "Search" ? Has it happened just once or several times?

(2) It's also good to get feedback when a solution is found, return to the original post to explain how it was resolved so that more people can also use the results.

Problems with Greek or Cyrillic Characters ?

No replies
Fri, 2005-08-12 02:45
Hannes de Bruyne
User offline. Last seen 2 years 44 weeks ago. Offline
Joined: 25 Jul 2005
Posts: 154
Groups: None
P3 has problems with Greek or Cyrillic Characters. Why? Well P3 only reads up to 256 characters (Ansi Code). Windows however works with fonts that have a few thousand characters. In these fonts the Greek and Cyrillic characters are at positions of about 900 and 1000. So they cannot be read by P3. Fonts like ArialGreek however have their code within the 256 limit. How to transfer text written in Excel with normal multicode into Ansi, so that it can be read with ArialGreek? Very easy, just convert the characters with a macro:

Sub TranslateGreek()
Dim test, zwischen As String

If Cells(1, 1) <> "" Then
test = ""
For i = 1 To Len(Cells(1,1))
zwischen = AscW(Mid(Cells(1,1), i, 1))
test = test & IIf(zwischen < 256, ChrW(zwischen), ChrW(zwischen - 720)) ’deduct 848 for Cyrillic
Next i
Cells(1,2) = test

End If

End Sub
Top