Live-Forum - Die aktuellen Beiträge
Datum
Titel
16.10.2025 18:38:17
Zusammenfassung nach Personalnummer
16.10.2025 17:40:39
Rabattstafel
16.10.2025 17:25:38
bedingte Formatierung
16.10.2025 16:39:53
Ergebnisse nach rechts ausgeben
Keine passende Antwort im Forumarchiv gefunden?
Stelle deine Frage im Live-Forum
Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
432to436
432to436
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Tabellennamen automatisch vergeben

Forumthread: Tabellennamen automatisch vergeben

Tabellennamen automatisch vergeben
28.05.2004 10:41:26
Sascha
Hallo zusammen,
ich möchte eine Exceltabelle für jeden Monat (Mai-Dezember 2004) erstellen. In jeder Tabelle muss es für jeden Tag ein Tabellenblatt geben.
Das heisst, die Exceltabelle des Monats Mai soll die Tabellenblätter 01. Mai, 02.Mai, 03.Mai...30.Mai enthalten. Die Exceltabelle des Monats Juni die Tabellenblätter 01.Juni, 02.Juni....30.Juni usw.
Gibt es die Möglichkeit dies in irgendeiner Weise schnell zu erledigen?
Wenn man alles mit der Hand machen müsste wäre man ja Tagelang beschäftigt.
Für Hilfe wäre ich sehr dankbar
Gruss
Sascha
Anzeige

3
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Tabellennamen automatisch vergeben
28.05.2004 11:29:02
Matthias
Hallo Sascha,
dies sollte es tun:

Sub Erstellen()
Dim m  As Integer, y As Integer, i As Integer
Dim d As Date, d_next As Date
Dim tage As Integer
m = InputBox("Monat (Zahl 1-12)")
y = InputBox("Jahr")
d = DateSerial(y, m, 1)
d_next = DateSerial(y, m + 1, 1)
tage = d_next - d
Workbooks.Add
Do
Sheets.Add
Loop Until Sheets.Count = tage
For d = 1 To tage
Sheets(d).Name = Format(DateSerial(y, m, d), "d/mmm")
Next d
End Sub

Gruß Matthias
P.S. Eine Rückmeldung wäre nett!
Anzeige
AW: Tabellennamen automatisch vergeben
28.05.2004 11:54:44
Sascha
Hallo Matthias,
das VBA-Makro funktioniert einwandfrei. Vielen Dank für die Information, das erspart uns eine Menge Arbeit.
Ich wünsche Dir schöne Pfingsttage und nochmals vielen Dank.
Gruss
Sascha
Danke ebenfalls, geschlossen - o.T.
28.05.2004 12:09:29
Matthias
-
;

Forumthreads zu verwandten Themen

Tabelle nach Namen durchsuchen -> Wert ausgeben
Aschi

Hallo,
ist es möglich mit einer Excel Funktion eine Tabelle nach gewissen Informationen zu durchlaufen und in einer anderen Zelle dann einen entsprechenden Wert auszugeben?
Also z.B. ich habe eine Liste und in der Zelle E steht „1. FC Köln“, eine Zeile darunter steht in E „FC Bayern Mün...
02.12.2008 16:17:12
Thread-ID: 1029551
8 Beiträge
Anzeige
Tabellenblat Namen geben
Karsten

Hallo,
ich möchte meinem aktuellen Tabellenblatt einen anderen Namen geben. z.B "xxx".
Gibt es so etwas, wie:
activeSheets.Name = "xxx" ?
Danke für eure Hilfe.
Gruß
Karsten
08.07.2009 11:40:42
Thread-ID: 1087154
3 Beiträge
Tabelle kopieren und Namen geben
Ronald

Hallo, ihr "Excellenten",wenn ich in Tabelle 1 eine Zelle mit einem Namen markiere und dann auf ein Button klicke, soll Tabelle 2 (Vorlage) komplett kopiert werden und als neues Tabellenblatt der Mappe eingefügt werden mit dem Blattnamen der Markierung.Danke im voraus Ronald
07.11.2002 12:25:16
Thread-ID: 178225
3 Beiträge
Tabellennamen vergeben
Silvia
Hallo Leute

Wie kann ich folgende Aufgabe am elegantesten lösen (oder besser gesagt: wie kann ich sie überhaupt lösen)

Ich möchte eine neue Tabelle einfügen und ihr den Namen aus einer Variablen (zB: Tabname = "abc") geben.
Wenn allerdings bereits eine Tabelle mit genau diesem...
10.09.2003 11:41:38
Thread-ID: 307734
6 Beiträge
Anzeige
tabellenblätter namen geben!
thomas

Hi leute,
ich habe leider Gottes die undankbare Aufgabe eine riesige Makrosammlung von meinem Azubi-Vorgänger dynamisch umzuschreiben!
Mit meiner Version soll der Benutzer selbst die Tabellenblätter benennen können,
benennen können in welcher Zeile er welcher Werte mit was verabeiten...
16.11.2004 10:22:35
Thread-ID: 518133
2 Beiträge
Anzeige
Alletabellennamen auslesen und ausgeben.
Nathalie

Hallo zusammen,
ich habe mittels common Dialog mir die Möglichkeit geschaffen, eine bestimmte Datei auszulesen. Den Pfad der Datei speicher ich mir in einer Variable und möchte später mit dem Befehl
Transferspreadsheed den Inhalt importieren.
Problem ist nur, das diesser Befehl die...
20.03.2005 13:45:10
Thread-ID: 587896
2 Beiträge
Tabellennamen ind Zellenwert übergeben
AVD

Folgendes Problem;
möchte in der Zelle A1 den Namen des Tabellenblattes automatisch drin stehen haben.
Was muss ich wo eintragen.
Danke für eure Beiträge
Alex
27.05.2006 23:17:02
Thread-ID: 768001
2 Beiträge
Tabellennamen ind Zellenwert übergeben
AVD

Folgendes Problem;
möchte in der Zelle A1 den Namen des Tabellenblattes automatisch drin stehen haben.
Was muss ich wo eintragen.
Danke für eure Beiträge
Alex
27.05.2006 23:07:33
Thread-ID: 768002
3 Beiträge
Anzeige
Tabellennamen beim erstellen vergeben
Universal

Hallo liebe VBA`ler,
der Betreff sagt eigentlich schon alles. :) Ich möchte, wenn ich mit dem Befehl
ActiveWorkbook.Sheets.Add
ein neues Tabellenblatt erstelle, gleich den Namen vergeben. Somit würde ich mir ein Umbennen sparen.
Ist dies möglich?
vielen Dank!
Gruß
Un...
22.04.2007 11:30:00
Thread-ID: 864220
4 Beiträge
Zugehörigen Tabellenblattnamen ausgeben
Christof
Hallo zusammen,
ich habe eine Datei mit mehreren Tabellenblättern, in denen jeweils Daten eines bestimmten Jahres enthalten sind sowie ein Statistikblatt, in dem u. a. die Min- und Max-Werte aus allen Jahren zusammen ermittelt werden.
Nun würde ich gerne zu den ermittelten Werten auch das zu...
04.07.2021 09:56:00
Thread-ID: 1837699
3 Beiträge
Tabellenblattnamen vorgeben in Code
Thomas
Hallo
Ich benötige wieder einmal Eure Hilfe.
Wo kann ich in dem folgenden Code, das Ziel-Tabellenblatt vorgeben?
Das Tabellenblatt wo es reinkopiert werden soll heißt "Ergebnisblatt".
Danke schön für die Hilfe.
Private Sub CommandButton1_Click() Dim arrDateien As Variant Dim wb...
01.03.2023 10:57:08
Thread-ID: 1922281
4 Beiträge
Entdecke relevante Threads

Schau dir verwandte Threads basierend auf dem aktuellen Thema an

Alle relevanten Threads mit Inhaltsvorschau entdecken
Anzeige
Anzeige

Infobox / Tutorial

Tabellennamen automatisch vergeben in Excel

Schritt-für-Schritt-Anleitung

Um in Excel Tabellennamen automatisch zu vergeben, kannst du ein VBA-Makro verwenden. Folge diesen Schritten:

  1. Öffne Excel und drücke ALT + F11, um den VBA-Editor zu öffnen.

  2. Klicke auf Einfügen und wähle Modul, um ein neues Modul zu erstellen.

  3. Kopiere und füge den folgenden VBA-Code in das Modul ein:

    Sub Erstellen()
    Dim m  As Integer, y As Integer, i As Integer
    Dim d As Date, d_next As Date
    Dim tage As Integer
    m = InputBox("Monat (Zahl 1-12)")
    y = InputBox("Jahr")
    d = DateSerial(y, m, 1)
    d_next = DateSerial(y, m + 1, 1)
    tage = d_next - d
    Workbooks.Add
    Do
        Sheets.Add
    Loop Until Sheets.Count = tage
    For d = 1 To tage
        Sheets(d).Name = Format(DateSerial(y, m, d), "d/mmm")
    Next d
End Sub

  4. Schließe den VBA-Editor und gehe zurück zu Excel.

  5. Drücke ALT + F8, wähle das Makro Erstellen aus und klicke auf Ausführen.

  6. Gib den gewünschten Monat und das Jahr an. Das Makro erstellt nun die Tabellenblätter für jeden Tag des Monats mit den entsprechenden Namen.

Häufige Fehler und Lösungen

  • Fehler: "Der Name ist nicht gültig"

    • Lösung: Stelle sicher, dass die Namen der Tabellenblätter keine ungültigen Zeichen (z.B. /, \, ?, *, [ oder ]) enthalten.

  • Fehler: "Maximale Anzahl an Blättern erreicht"

    • Lösung: Überprüfe die Anzahl der bereits vorhandenen Blätter im Workbook. Excel erlaubt maximal 255 Blätter.

Alternative Methoden

Wenn du kein VBA verwenden möchtest, kannst du auch die Funktion "Blatt kopieren" nutzen:

  1. Erstelle ein Blatt mit dem Namen eines Tages.
  2. Klicke mit der rechten Maustaste auf das Blatt und wähle Verschieben oder Kopieren.
  3. Wähle die Option Kopie erstellen, um mehrere Blätter mit ähnlichen Namen zu erstellen.
  4. Ändere die Namen manuell, indem du auf jedes Blatt doppelklickst und den gewünschten Namen eingibst.

Praktische Beispiele

  • Beispiel 1: Erstelle die Tabellenblätter für den Monat Januar 2024. Gib 1 für den Monat und 2024 für das Jahr ein. Das Makro erstellt Blätter mit den Namen 1/JAN, 2/JAN, ..., 31/JAN.

  • Beispiel 2: Wenn du die Tabelle für den Monat Februar 2023 erstellst, gib 2 und 2023 ein. Das Ergebnis sind die Blätter 1/FEB, 2/FEB, ..., 28/FEB (oder 29/FEB in einem Schaltjahr).

Tipps für Profis

  • Tabellennamen ändern in Excel: Du kannst die Tabellennamen auch nachträglich ändern, indem du mit der rechten Maustaste auf das Blatt klickst und Umbenennen wählst.
  • Verwende die Funktion Format(DateSerial(...)), um das Datumsformat nach deinen Wünschen anzupassen. Zum Beispiel kannst du auch "dd.mm" verwenden, um die Namen im Format "01.01" zu erhalten.
  • Experimentiere mit weiteren VBA-Funktionen, um zusätzliche Automatisierungen in deinen Excel-Tabellen vorzunehmen.

FAQ: Häufige Fragen

1. Frage: Kann ich das Makro auch für andere Monate verwenden?
Antwort: Ja, das Makro ist flexibel und kann für jeden Monat und jedes Jahr verwendet werden.

2. Frage: Was kann ich tun, wenn ich keine VBA-Kenntnisse habe?
Antwort: Du kannst andere Methoden wie das Kopieren von Blättern verwenden oder jemanden um Hilfe bitten, der sich mit VBA auskennt.

Beliebteste Forumthreads (12 Monate)

Jetzt das Excel-Portal bewerten: Deine Stimme zählt!
Anzeige
Anzeige
Entdecke mehr
Finde genau, was du suchst

Die erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden

Suche nach den besten Antworten
Unsere beliebtesten Threads

Entdecke unsere meistgeklickten Beiträge in der Google Suche

Top 100 Threads jetzt ansehen
Anzeige