Der Name des Tabellenblatts soll in einer Excellzelle angezeigt werden. wird der Name des Tabelleblatts verändert soll sich auch die Zelle dem Neuen Namen anpassen.
DAnke für Eure Hilfe
Private Sub Worksheet_Activate()
Dim n As String
n = ActiveSheet.Name
ActiveSheet.Range("A1").Value = n
End Sub
Gruß
Chaos