Ersetzen nur beim ersten Lauf
15.09.2002 23:00:59
Kai
Ich habe ein Makro, welches eine dbf-Datei einlist und auswertet.
In einer Spalte stehen FALSCH oder WAHR Werte.
Diese möchte ich ersetzen gegen "" oder "X".
Die mache ich mit
.Range(.Cells(2, 6), .Cells(Pzahl, 6)).Replace What:=False, replacement:=""
.Range(.Cells(2, 6), .Cells(Pzahl, 6)).Replace What:=True, replacement:="X"
oder mit:
.Range(.Cells(2, 6), .Cells(Pzahl, 6)).Replace What:="false", replacement:=""
.Range(.Cells(2, 6), .Cells(Pzahl, 6)).Replace What:="true", replacement:="X"
Beides geht, aber nur beim ersten Lauf.
Wenn ich das Makro neu starte (dbf öffnen, in die Tabelle kopieren, ersetzen), dann bleibt FALSCH und WAHR stehen.
Erst wenn ich Excel neu starte geht es einmal, dann nicht wieder.
Woran liegt das?
Danke für Hilfe
Grüße
Kai