ich möchte an einen vorhandenen Text in einer Zelle das Symbol für "Pfeil" (=0174) einfügen und anschließend wieder einige Zeichen in der ursprünglichen Schriftart (=Arial) hinzufügen.
Um den Pfeil einzufügen habe ich auf Herberts Excel CD-Rom folgendes Makro gefunden:
Sub Symbol_Pfeil()
Dim rng As Range
For Each rng In Selection.Cells
rng.Value = rng.Value & Chr(174)
rng.Characters(Start:=Len(rng.Value), _
Length:=1).Font.Name = "Symbol"
Next rng
End Sub
Leider bin ich völliger Neuling auf dem Gebiet von VBA und bekomme es einfach nicht hin, nach dem Pfeil weiter mit Ariel zu schreiben.
(Mein Ziel ist es, innerhalb von einem Dienstplan über benutzerdefinierte Schaltflächen auf "Knopfdruck" z.B. zu einem "F" in einer Zelle, einen Pfeil und ein "S" hinzuzufügen).
Vielen Dank im Voraus für jede Hilfestellung
Gruß Sabine