Replacer - Problem mit Platzhalter?!
06.06.2007 15:24:00
Frank
Ich habe mir folgendes Makro per Rekorder aufgezeichnet und möchte es nun per Zuweisung zu einer Schaltfläche verwenden:
'Replacer
Range("B3:D14").Select
Selection.Replace What:=";*", Replacement:="", LookAt:=xlPart, _
SearchOrder:=xlByRows, MatchCase:=False, SearchFormat:=False, _
ReplaceFormat:=False
Im Bereich B3:D14 stehen Formeln mit Verweisen. Ich möchte nun mit obigem Makro einen Teil der Vereise löschen. Nämlich den Teil, der nach dem Semikolon kommt. Daher habe ich ";*" geschrieben und möchte es durch "nichts" ersetzen.
Beim Ersetzten von einzelnen Buchstaben funktioniert das einwandfrei. Ich nehme an, es liegt am Platzhalter(*) in Verbindung mit dem Ersetzen in Formeln, bin mir aber nicht sicher.
In anderen Makros habe ich das Platzhalterzeichen (*) auch schon verwendet, dort hat es funktioniert. Jedoch müssten dort echte Zellinhalte verändert werden, kiene Formeln in Zellen.
Hat jemand eine Idee dazu?
Gruß
Fank