Thema: Eingrenzen der Spalten | Herbers Excel-Forum

Hallo Zäme
Folgenden Script habe ich zum Ersetzten von Werten erhalten. Er funktioniert auch einwandfrei.

   Dim rngX As Range
With Sheets(AktTabelle)
Set rngX = .Range("a1").Find("a")
Cells.Replace What:=.Range("C3"), Replacement:=.Range("C4"), _
LookAt:=xlPart, SearchOrder:=xlByRows, MatchCase:=False, _
SearchFormat:=False, ReplaceFormat:=False
End With

Wie kann ich das Ersetzen von Werten auf Spalte A und B eingrenzen?
Danke für einen Tipp
Gruss
Ron

Dim rngX As Range
With Sheets(AktTabelle)
Set rngX = .Range("a1").Find("a")
Range("A:B").Replace What:=.Range("C3"), Replacement:=.Range("C4"), _
LookAt:=xlPart, SearchOrder:=xlByRows, MatchCase:=False, _
SearchFormat:=False, ReplaceFormat:=False
End With

Hallo Chris
Danke für die schnelle Lösung. Funktioniert wie gewünscht.
Merci und Gruss
Ron