aus mehreren spalten gleichzeitig löschen

[ari-2001]

Hallo,
ich lösche per makro gewisse Zeichen in einer Spalte (D):

ws.Columns("D").Replace " 01", "", LookAt:=xlPart


Jetzt möchte ich, dass auch aus der Spalte (F) das gleiche gelöscht wird.

jetzt schreibe ich zusätzlich noch:

ws.Columns("F").Replace " 01", "", LookAt:=xlPart


Meine Frage, kann ich das in einem Befehl zusammenschreiben? Dann würde ich mir ja einiges an Schreiberei sparen.

Ich muss die Zahlen "01" bis "09" in beiden Spalten entfernen, hat das jemand einen Tipp für mich?

Viele Grüße
Andreas

[Der Steuerfuzzi]

Hallo,

probier es mal so (ungetestet):

Code:

ws.Range("D:D, F:F").Replace " 01", "", LookAt:=xlPart

[ari-2001]

Vielen Dank, funktioniert