Habe gerade versucht, ein Makro aufzuzeichnen, welches mir alle Formeln, in denen der Text der Zelle A1 vorkommt mit dem Text der Zelle B1 zu ersetzen.
Sub DateiUpdate()
Selection.Copy
Range("A1").Select
Application.CutCopyMode = False
Selection.Copy
Range("B1").Select
Cells.Replace What:="1.Quartal", Replacement:="2. Quartal", LookAt:=xlPart, _
SearchOrder:=xlByRows, MatchCase:=False, SearchFormat:=False, _
ReplaceFormat:=False
Sheets("Help").Select
Range("E20").Select
Application.CutCopyMode = False
End Sub
Leider hat die Aufzeichnung die zellinhalte als Text übernommen, so dass nun (wenn ich z.B. 3. Quartal hätte) keine Anpassung erfolgt. Wie kann ich also "1. Quartal" mit "Inhalt aus Zelle B1" ersetzen?
Danke und Gruß
Martin