Frage:
Kann man den Blattnamen variabel so gestalten, dass er aus einer Zelle ausgelesen wird?
Also z.B: Zellinhalt A1=Sheetname?
Danke fürs helfen
Gruß Ralf
Private Sub Worksheet_Calculate()
BlattnameAusZelleA1
End Sub
Private Sub Worksheet_Change(ByVal Target As Range)
BlattnameAusZelleA1
End Sub
Sub BlattnameAusZelleA1()
On Error Resume Next
ActiveSheet.Name = [A1] 'Blatt mit Inhalt der Zelle A1 benennen
If Err Then MsgBox "Ungültiger/Doppelter (Blatt-)Name in Zelle A1", _
vbCritical, "Blatt kann nicht umbenannt werden !"
End Sub