|
hallo,
in meinem ungarischkurs müssen lange vokale in excel-zellen geschrieben werden können: O und o sowie U und u, also unsere umlaute nicht mit punkten sondern mit strichen. die teilnehmer haben die verschiedensten excelversionen auf ihren laptops, manche ohne numerisches tastenfeld, so dass Alt+336 für O usw. sowieso nicht geht.
nun hatte ich die idee, dass man zunächst ö1 (für O), ö2 (für o) usw. an die entsprechende stelle in die wörter schreiben soll und am ende in einem atemzug alles durch die richtigen zeichen ersetzen lässt.
dazu habe ich ein makro geschrieben, das die teilnehmer mit einer tastenkombination ausführen sollen. auszug aus dem code:
Cells.Replace What:="ö1", Replacement:=ChrW(151)
Cells.Replace What:="ö2", Replacement:=ChrW(150)
Cells.Replace What:="ü1", Replacement:=ChrW(171)
Cells.Replace What:="ü2", Replacement:=ChrW(170)
ChrW, also die hex-codes, habe ich genommen, weil die dezimalcodes einen syntaxfehler zeigen: z.b. Cells.Replace What:="ö2", Replacement:=Chr(336). warum eigentlich?
aber mit ChrW funktioniert es auch nicht, ChrW(171) und ChrW(170) bringen andere zeichen und ChrW(151) sowie ChrW(150) ersetzt durch nichts. was ist falsch?
oder gibt es für meinen zweck noch eine elegantere lösung, diese sonderzeichen (mit allen excel-versionen und ohne numerisches tastenfeld) zu schreiben?
danke im voraus
helmut.em
|