Makro ändern
29.01.2005 10:53:47
HeinzH
Habe ein Makro das mir beim einfügen eines neuen Tabellenblattes den Namen des Tabellenblattes (A6 & A52) automatisch übernimmt,funkt.tadellos.
Nur Beim ersten Tabellenblatt,müsste der Namen von Tabellenblatt "Legende D11" statt A6 im gleichen Tabellenblatt übernommen werden.A52 im gleichen Tabellenblatt sollte bleiben.Wie gehört dieses Makro geändert.
Probier schon einige Zeit ohne Ergebniss.
Könnte mir bitte jemand helfen.
Danke Heinz
Private Sub Worksheet_Change(ByVal Target As Excel.Range)
Dim neuer_Blattname As String
If Target.Address = "$A$6" Or Target.Address = "$A$52" Then
neuer_Blattname = Range("A6") & " bis " & Range("A52")
ActiveSheet.Name = neuer_Blattname
End If
End Sub