Replace-Methode funtioniert nicht
24.07.2004 17:20:19
Stefan
ich möchte in einem Arbeitsblatt alle Werte "FALSCH" durch "Nein" ersetzen und alle "WAHR" durch "Ja".
Folgendes Makro habe ich dafür aufgezeichnet:
Cells.Replace What:="falsch", Replacement:="Nein", LookAt:=xlPart, _
SearchOrder:=xlByRows, MatchCase:=False, SearchFormat:=False, _
ReplaceFormat:=False
Cells.Replace What:="wahr", Replacement:="Ja", LookAt:=xlPart, _
SearchOrder:=xlByRows, MatchCase:=False, SearchFormat:=False, _
ReplaceFormat:=False
Während der Aufzeichnung funktioniert es prima, beim Ausführen im Makro allerdings nicht.
Auch mit diesem Makro habe ich keinen Erfolg:
Worksheets("ODC-Datei Vertragsdurchlauf").Cells.Replace What:="WAHR", Replacement:="Ja", _
SearchOrder:=xlByColumns, MatchCase:=True
Worksheets("ODC-Datei Vertragsdurchlauf").Cells.Replace What:="WAHR", Replacement:="Ja", _
SearchOrder:=xlByColumns, MatchCase:=True
Nun bin ich ratlos. Das ist doch nun wahrlich nichts mega-anspruchsvolles. Warum funktioniert es nicht?
Weiß nicht, ob es wichtig ist: Das Excel-Sheet ist ein Import aus einer Access-ODC-Datei.
Für alle Lösungsansätze schonmal im Vorfeld vielen Dank!
Grüße, Stefan