Herbers Excel-Forum - das Archiv
Tabellenblatt umbenennen?
Betrifft: Tabellenblatt umbenennen?
von: Schmoch
Geschrieben am: 10.10.2003 18:11:58
Ich möchte das ein bestimmter wert auch meiner tabelle auch gleich der name der seite ist!!!
bsp. a1 = Name1, b1 = Name2
jetzt möchte ich das erste blatt nach a1 einer seite benennen, und das zweite blatt nach b1.
ist das möglich?
Betrifft: AW: Tabellenblatt umbenennen?
von: geri
Geschrieben am: 10.10.2003 18:49:49
Hallo Schmoch !!!
so geht es
dies in Modul einfügen
Sub Blattnamen()
Dim i As Integer
'in Zellen A1-A3 steht der blattname aktive Blatt
For i = 1 To 3
ActiveWorkbook.Sheets(i).Name = ActiveSheet.Cells(i, 1).Value
Next i
End Sub
gruss geri
Betrifft: AW: Tabellenblatt umbenennen?
von: Schmoch
Geschrieben am: 11.10.2003 11:45:41
??????????????????????????????????????????????
NIX VERSTEHEN
Betrifft: AW: Tabellenblatt umbenennen?
von: geri
Geschrieben am: 13.10.2003 08:15:43
Hallo Schmoch
Nix verstehem hilft nicht weiter aber das öffne Excel, drücke Taste ALT+F11 dan öffnet sich VBA, dann siehst du links dein File klicke oben auf hinzufügen, wähle Modul
kopiere den Code von oben hinein, gehe zurück zu Deiner Mappe, gehe zu Extras, Makro dann siehst du "Blattnamen" dann ausführen und deine Blätter sind umbennat wie gewünscht
gruss geri