ich habe eine Datei mit 4 Tabellen.
Eine Tabelle davon dient zur "Pflege" der Tabellennamen.
Dh. wenn ich in der Tabelle 4 die Namen der Tabellen 1 , Tabelle 2 oder Tabelle 3 ändern möchte, dann kann ich sie da anpassen und die Registernamen ändern sich automatisch nach jeder Eingabe.
Ich habe etwas ausprobiert und das funktioniert aber leider nicht, es soll nichts kompliziertes sein. Ich bin mir auch nicht sicher ob mein Ansatz komplett falsch ist.
In meinem Tabellenblatt 4 in der Zeile B1 (Tabelle1Name) bis B3 (Tabelle3Name) kann man die Namen der Register ändern.
Das habe ich bisher aber das funktioniert nicht wirklich.
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Target.Column = 2 And Target.Row = 1 Then
NameRegister = Target.Value
If Application.Workbooks("test.xlsm").Worksheets.Count >= Target.Row Then
Application.Workbooks("test.xlsm").Sheets(1).Name = NameRegister
End If
End If
End Sub