VBA-Registername in Zelle, vereinfachte Schreibwei
28.02.2008 17:26:53
mario
in einer Mappe mit Blätter Januar, Februar - Dezember möchte ich den Registerblattnamen in einer Zelle anzeigen. Für ein Blatt geht es, ich möchte es aber für die restlichen auch.
Gibt es eine vereinfachte Schreibweise
Private Sub Worksheet_Activate()
Cells(3, 1).Value = Worksheets(Januar).Name
Cells(3, 1).Value = Worksheets(Februar).Name
Cells(3, 1).Value = Worksheets(März).Name
Cells(3, 1).Value = Worksheets(Dezember).Name
End Sub
Anzeige