Tabellennmae aus Zelle
15.05.2018 00:12:02
StefanGlander
ich möchte gerne meine 3 Tabellenblätter umbenennen.
Dieses soll mi einem Commandbutton geschehen. Blattname 1 soll in Zelle B2 stehen
Blattname in Zelle B3 und Blattname 3 in Zelle B4.
Für ein Tabellenblatt sieht das so aus.
Aber wie für 3 ?
Sub umbenennen()
ActiveWorkbook.Sheets(1).Name = Range("A1").Value
End Sub
Private Sub CommandButton1_Click()
umbenennen
End Sub
Gruss
Stefan