"=" Zeichen
14.11.2008 16:44:17
Hendryk
ich habe folgendes Problem mit diesem Makro. Und zwar möchte ich vor jedem Zelleintrag ein "=" Zeichen setzen. Dieses Marko funktioniert mit jedem anderen Zeichen, aber nicht mit dem "=" Zeichen. Ich versteh die Welt nicht mehr. ich hoffe ihr könnt mir weiterhelfen.
Sub istgleich()
Dim Zelle As Range
Dim ActPos As String
ActPos = ActiveCell.Address
For Each Zelle In Selection
Zelle = "=" & Zelle.Value
Next Zelle
Range(ActPos).Select
Viele Grüße
Hendryk
End Sub
Anzeige