ich möchte gern in meiner Datei in Tabelle1 Zelle A1 einen Namen vergeben, der dann in die Kopfzeile der Tabelle2 (Mitte) übernommen wird.
Kann mir jemand dabei helfen?
Vielen Dank
Hans - Georg
Sub kopf()
Worksheets("Tabelle2").PageSetup.CenterHeader = Worksheets("Tabelle1").Range("A1")
End Sub
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Address = "$A$1" Then
ThisWorkbook.Worksheets("Tabelle2").PageSetup.CenterHeader = Target.Value
End If
End Sub