Sonderzeichen in aktive Zelle einfügen
05.04.2005 15:01:33
Holger
nachdem mir heute morgen keiner weiterhelfen konnte (war auch etwas komplizierter, ich gebs zu), bin ich selbst auf eine einfachere Idee gekommen:
Ich habe ein eigenes Symbol kreiert und in die Symbolleiste eingefügt. Beim Anklicken wird per Makro das Sonderzeichen "größergleich" in eine Excel-Zelle eingefügt. Siehe hierzu hier mein Makro:
Sub GrößerGleich_einfügen()
With Selection
.FormulaR1C1 = "]"
.Characters(Start:=1, Length:=1).Font.Name = "UniversalMath1 BT"
End With
End Sub
Das klappt zwar wunderbar, doch habe ich nun das Problem, dass die gesamte Zelle mit dieser Schriftart formatiert ist. Das Makro wird auch nicht ausgeführt, wenn ich die Zelle aktiviere (mit aktivem Cursor). Weißt da jemand Abhilfe?
Gruß, Holger