Hallo,
ich möchte gerne Tabellenspalten mit Suchen und ersetzen bearbeiten. Dafür habe ich mir ein Makro aufgezeichnet:
Sheets("Kopiervorlage").Select
Columns("A:A").Select
Selection.Replace What:="XXXX", Replacement:="YYYY", LookAt:=xlPart, _
SearchOrder:=xlByRows, MatchCase:=False, SearchFormat:=False, _
ReplaceFormat:=False
Columns("B:B").Select
Selection.NumberFormat = "@"
Selection.Replace What:="4711", Replacement:="0815", LookAt:=xlPart, _
SearchOrder:=xlByRows, MatchCase:=False, SearchFormat:=False, _
ReplaceFormat:=False
Nun möchte ich gerne, dass das Programm sich den Wert "XXXX" automatisch aus dem Tabellenblatt "Kopiervorlage" und dem Feld A1 nimmt und den Wert "YYYY" aus dem Tabellenblatt "Rechnung" und dem Feld B3.
Den Wert "4711" soll er sich aus dem Tabellenblatt "Kopiervorlage" und dem Feld B1 nehmen, den Wert "0815" aus dem Tabellenblatt "Rechnung" und dem Feld B4 nehmen.
Wie muss die Syntax dazu lauten?
Lieben Gruß
Marc