Replace mit Platzhalter
Uschi
ich möchte mittels VBA Datumswerte, die in Spalte D stehen, über Suchen/Ersetzen in den Monatsnamen umwandeln.
Dazu habe ich mittels Recorder das folgende Makro aufgezeichnet:
Sub Macro1()
Columns("D:D").Select
Selection.Replace What:="?.04.2011", Replacement:="April", LookAt:=xlPart _
, SearchOrder:=xlByRows, MatchCase:=False, SearchFormat:=False, _
ReplaceFormat:=False
Selection.Replace What:="?.03.2011", Replacement:="March", LookAt:=xlPart _
, SearchOrder:=xlByRows, MatchCase:=False, SearchFormat:=False, _
ReplaceFormat:=False
End Sub
Während ich das Makro aufzeichne, funktioniert Suchen/Ersetzen auch. Wenn ich aber das Makro anschließend starte, wird nichts ersetzt.
Ich hab das Ganze auch mit "*" statt "?" probiert, das klappt aber auch nicht.
Woran liegt's?
Vielen Dank schon mal für Eure Hilfe.
LG
Uschi