Tabellenblätter mit VBA umbenennen
11.03.2008 18:50:15
Michael
ich möchte Tabellenblätter per VBA umbennen. Folgenden Code habe ich im Forum gefunden. Das Tabellenblatt wird aber nur umbenannt, wenn sich die Zelle N1 ändert. Ich möchte aber nun, dass immer der Wert bzw. der in Zelle N1 steht als Tabellenblattname benutzt wird oder bzw. beim Neuberechnen des Datei als Tabellenblattname eingetragen wird.
Gruß
Michael
Private Sub Worksheet_Change(ByVal Target as Range)
On Error Resume Next
If Target.Address(0,0) = "N1" Then
ActiveSheet.Name = Target.Text
End If
End Sub
Anzeige