Tabellenblätter

Forumthread: Tabellenblätter
1 Beitrag zu diesem Forumthread
Anzeige

Forumthread: Tabellenblätter

Tabellenblätter

18.05.2006 10:46:22

Micha

Hallo zusammmen, ich möchte meine Tabellenblätter aufsteigend nach Monaten benennen. In einer anderen Datei nach wochentagen. Gibt es aucvh die Möglichkeit nach: Januar 2001; Februar 2001 usw zu benennen. Wer kann mir helfen? Micha

1
Beitrag zum Forumthread

Beitrag zu diesem Forumthread

Betreff

Datum

Anwender

AW: Tabellenblätter

18.05.2006 14:00:19

Harald

AW: Tabellenblätter

18.05.2006 14:00:19

Harald

Hi Micha,
das wäre ne Möglichkeit (Array deinen Wünschen anpassen)


Sub benennen()
Dim i As Integer, blattname As String
i = 1
For Each blattname In Array("Montag", "Dienstag", "Mittwoch")
Sheets(i).Name = blattname
i = i + 1
Next blattname
End Sub

oder mit einer Schleife
Im Bsp. stehen die versch. Blattnamen im Blatt 1 ab Zelle A1 untereinander
also Sheets(1).cells(i, 1)


Sub benennenA()
Dim i As Integer
For i = 1 To Sheets.Count 'erstes bis letztes Blatt
Sheets(i).Name = Sheets(1).Cells(i, 1).Value
Next i
End Sub

Gruss Harald

Jetzt das Excel-Portal bewerten: Deine Stimme zählt!

Live-Forum - Die aktuellen Beiträge

Datum

Titel

14.05.2026 13:31:09

Zeichen ausblenden

14.05.2026 09:50:42

Makro für MacOs

13.05.2026 19:14:18

Gleichheitszeichen

13.05.2026 14:24:56

VBA Projekt Passwort automatisch eingeben

13.05.2026 08:49:41

Reale Berechnung ohne Nachkommawerte

Keine passende Antwort im Forumarchiv gefunden?

Stelle deine Frage im Live-Forum

Tabellenblätter

Forumthread: Tabellenblätter

1 Beitrag zum Forumthread Beitrag zu diesem Forumthread

1
Beitrag zum Forumthread

Beitrag zu diesem Forumthread