Live-Forum - Die aktuellen Beiträge
Datum
Titel
19.04.2024 08:41:23
Zwei Makros in ein Arbeitsblatt - zweite wird nicht ausführt
18.04.2024 21:09:11
4 Spalten aus smarter Tabelle in andere smarte Tab. kopieren
18.04.2024 20:45:35
Worksheet_Activate für alle Sheets
18.04.2024 19:30:20
VBA - Tabelle mit Mannschaftsergebnissen sortieren
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
432to436
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
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 Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

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

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!
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
Anzeige
Danke ebenfalls, geschlossen - o.T.
28.05.2004 12:09:29
Matthias
-

151 Forumthreads zu ähnlichen Themen

Registerblattname automatisch ändern | Herbers Excel-Forum
Christian Wendker
Hallo Spezilisten!
Habe ein Problem mit den Registerblattnamen. Ich habe auf der ersten Registerkarte eine Liste mit Namen und möchte jetzt die folgenden Registerkarten nach diesen Namen benennen. Außerdem sollen diese sobald ich einen Namen in der Liste ändere automatisch mit geändert werden.<...
17.01.2010 01:43:42
Thread-ID: 1130550
4 Beiträge
Anzeige
Automatische Änderung "Name Tabellenblatt"
Wolfgang

Hallo an alle,
ich habe folgendes Problem: wenn in L7 der Wert geändert wird, soll automatisch der Name des
Tabellenblattes geändert werden.
Beispiel: L7 = 2010, wird geändert auf 2011: Der Name des Tabellenblatt's soll nun ebenfalls 2011 sein.
Wie kriege ich das hin?
Mit Gr...
20.11.2010 16:46:20
Thread-ID: 1187949
3 Beiträge
Automatisches Umbenennen von Tabellenblätter
Tabellenblätter

Hallo Excel Freunde
Ich habe eine Tabelle mit ca. 250 Namen.
Nun möchte ich für jeden Namen ein eigenes Tabellenblatt einrichten. anstatt Tabelle1, Tabelle2 soll der Name erscheinen.
Ist es möglich dies per „Befehl“ auszuführen. Ist es weiterhin möglich dies noch per Hyperlink (pro...
21.06.2012 15:09:53
Thread-ID: 1268303
7 Beiträge
Anzeige
Datei kopieren und nach Zelle benennen
Lisa

Hallo zusammen.
ich würde gerne Datei "X" von \OrdnerA\ nach \OrdnerB\ kopieren.
In Zelle A1 vom Blatt1 steht das morgige Datum.
Die kopierte Datei soll nun nach A1 in Blatt1 benannt werden, sprich in etwa so:
"TTT_MM_JJ_X"
Ich habe bereits versucht eine neue Datei in \Ordne...
27.11.2014 15:36:42
Thread-ID: 1394972
10 Beiträge
Tabellenblätter automatisch erstellen und benennen
Bonduca

Hallo,
ich habe folgendes Problem:
In Tabelle 1 sind in der Spalte B (ab B4) Bezeichnungen. Die Anzahl dieser kann variieren. Mit diesen Bezeichnungen sollen neue Tabellenblätter automatisch erstellt werden.
In der Beispieldatei habe ich bereits die Tabellenblätter angelegt.
Auß...
24.02.2015 19:51:33
Thread-ID: 1411292
5 Beiträge
Neues Blatt automatisch erstellen und umbenennen
Jean
Liebe Forums-user,
ich habe folgendes, mehr oder weniger schwieriges Problem:
Ich habe in einem Blatt 1 Kontobewegungen. Jede Kontobewegung wird dabei u.a. einer Kategorie zugeordnet. Für jede Kategorie soll ein eigenes Blatt bestehen, in dem dann nur die entsprechenden Kontobewegungen dies...
09.03.2015 18:02:51
Thread-ID: 1413829
7 Beiträge
Tabellenblätter automatisch nach Zellen benennen
Fabian

Hallo
ich brauche für meine Excel-Tabelle ein Makro, das automatisch den Namen mehrerer Tabellenblätter ändert, sobald ich den Wert einer Zelle ändere.
In der Tabelle 1 trägt man ein Jahr ein, das in den einzelnen Blättern (5-16) für die Monate (August - Juli) von einem Datum in einen T...
16.04.2015 11:40:20
Thread-ID: 1421170
2 Beiträge
Namen automatisch vergeben aufgrund Tabellennamen
Jason

Hallo Wissen!
In einem Tabellenblatt habe ich 12 Spalten (A:L). In der Spalte J steht jeweils der Name des Projektleiters. Mit folgendem Makro werden die Daten gefiltert und automatisch ein separates Tabellenblatt pro Projektleiter erstellt. Anschliessend habe ich die Wahl, ob ich jedes Tab...
30.07.2015 08:20:09
Thread-ID: 1439303
3 Beiträge
Anzeige

Links zu Excel-Dialogen

InputBox

Beliebteste Forumthreads (12 Monate)

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

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige
Archiv - Verwandte Themen
Forumthread
Beiträge
3
7
2
6
23
9
4
6
1
2
8
3
6
1
1
3
13
3
5
1
6
5
1
11
7