und schon die nächste Frage:
Was ist hier falsch:
Rows("2:2").Select
Selection.Replace What:="BEITRAG_AB", Replacement:= _
"BEITRAG" & Chr(10) & "AB", LookAt:=xlPart, SearchOrder:=xlByRows, MatchCase _
:=False, SearchFormat:=False, ReplaceFormat:=False
Ich möchte den Text BEITRAG_AB ersetzen durch den Text
BEITRAG
AB
d.h. mit einem Zeilenumbruch.
Danke für die Hilfe und Servus, Walter