Live-Forum - Die aktuellen Beiträge
Datum
Titel
14.10.2025 19:08:54
Verbindung von Excel mit maps
14.10.2025 15:55:14
wenn zwei Werte aus Liste übereinstimmen, dann wahr
14.10.2025 14:57:29
Wenn Datum in Ferienzeit dann Name angeben
14.10.2025 09:39:44
VBA - Excel speichern und schließen (Laufzeitfehler 91)
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
756to760
756to760
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Tabellenblattnamen in Tabelle übertragen

Forumthread: Tabellenblattnamen in Tabelle übertragen

Tabellenblattnamen in Tabelle übertragen
23.04.2006 10:06:08
Sissy
Guten Morgen zusammen,
gibt es eine Möglichkeit, per Knopfdruck oder ähnlichem sämtliche Tabellenblattnamen in eine bestehende Tabelle zu schreiben?
Ich hab hier eine Datei mit 100 Blättern, die auch ergänzt werden können, und muss die Namen in diese Tabelle schreiben.
Ideen?
Gruß,
Sissy
Anzeige

5
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Tabellenblattnamen in Tabelle übertragen
23.04.2006 10:32:17
Gerd
Hallo Sissy,
so zum Beispiel:
Option Explicit

Sub Tabellenblattnamen()
Dim x As Integer
For x = 1 To Worksheets.Count
Worksheets("Tabelle2").Cells(x + 2, 3) = Worksheets(x).Name
Next
End Sub

Gruesse
Gerd
AW: Tabellenblattnamen in Tabelle übertragen
23.04.2006 11:05:25
Sissy
Danke, das klappt.
Kann man auch Tabellenblätter auslassen?
Z.B. das Startblatt und das mit der Liste?
Anzeige
AW: Tabellenblattnamen in Tabelle übertragen
23.04.2006 11:28:54
Gerd
Hallo Sissy,
ja das geht. Du musst es halt noch an deine Blattnamen anpassen.

Sub Tabellenblattnamen()
Dim x As Integer
For x = 1 To Worksheets.Count
if Worksheets(x).Name <> "Startblatt" and _
Worksheets(x).Name <> "Tabelle2" then
Worksheets("Tabelle2").Cells(x + 2, 3) = Worksheets(x).Name
end if
Next
End Sub

P.S. Das hatte ich vergessen zu erwähnen. Wenn Du Diagrammblätter hast, dass "Sheets" statt "Worksheets".
Gruesse
Gerd
Anzeige
AW: Tabellenblattnamen in Tabelle übertragen
23.04.2006 14:15:05
Sissy
Das funktioniert, aber nun scheint in dieser Zeilte ein Problem aufzutreten...
Worksheets("Tabelle2").Cells(x + 2, 3) = Worksheets(x).Name
und zwar sind die zwei Blätter, die ausgelassen werden nr 1+2 und werden anscheinend mitgezählt, so dass die Werte in cells(2+2, 3) geschrieben werden.
Ich hab jetzt erstmal zwei Zeilen versteckt, aber ne schönere Lösung wäre toll, zumal diese zwei nicht gelisteten Blätter ja auch später irgendwo auftauschen könnten...
Vielen Dank soweit.
Gruß, Sis
Anzeige
AW: Tabellenblattnamen in Tabelle übertragen
23.04.2006 16:39:19
Peter
Hallo Sis,
dann so:

Sub Tabellen_Blattnamen()
Dim iBlatt As Integer
Dim iZeile As Integer
iZeile = 3
For iBlatt = 1 To Worksheets.Count
If Worksheets(iBlatt).Name <> "Startblatt" And _
Worksheets(iBlatt).Name <> "Tabelle2" Then
Worksheets("Tabelle3").Cells(iZeile, 3) = Worksheets(iBlatt).Name
iZeile = iZeile + 1
End If
Next
End Sub

Viele Grüße Peter
Eine kurze Nachricht, ob es läuft, wäre nett - danke.
Anzeige
;

Forumthreads zu verwandten Themen

Einfügen in neuem Tabellenblatt
Space

Hallo,
ich habe folgendes Problem. Über einen Button auf dem Tabellenblatt1 will ich das Tabellenblatt 3 (Outlook Kontakte) öffnen und die Outlook entnommenen Kontakte dort eintragen lassen. Der Zugriff auf Outlook funktioniert wunderbar. Die Werte die er dort heraus bekommt trägt er aber...
19.01.2010 14:06:41
Thread-ID: 1131048
7 Beiträge
Einfügen in neuem Tabellenblatt
Space

Hallo, leider war mein letzter Beitrag schon wieder zu ... hier nocheinmal die Problematik:
ich habe folgendes Problem. Über einen Button auf dem Tabellenblatt1 will ich das Tabellenblatt 3 (Outlook Kontakte) öffnen und die Outlook entnommenen Kontakte dort eintragen lassen. Der Zugriff auf...
19.01.2010 14:59:16
Thread-ID: 1131070
2 Beiträge
Tabellenblätter in eine neue Tabelle
Peter

Guten Tag
Ich habe eine Datei mit 24 Worksheets, in welchen gleichviele Spalten abgefüllt sind ( A - K) jedoch unterschiedlich viele Zeilen.
Nun möchte ich gerne in eine weitere Tabelle alle Tabellen übernehmen
Wenn in Tabelle1 zB. 5 Zeilen gefüllt sind, möchte ich diese 5 in die ne...
26.02.2010 12:50:03
Thread-ID: 1141743
3 Beiträge
Name des Tabellenblatt in die Tabelle eintragen
Bernd

Hallo,
wie der Titel verrät, möchte ich den Namen im Blatt in die Tabelle
übertragen. Vorab, ich kenne mich mit den Excel Objecten nicht sonderlich aus.
Folgenden Versuch habe ich gestartet, klappt auch eingeschränkt.
Wenn ich die Formel eintrage klappt es, wenn der Name aber dana...
28.04.2002 22:25:33
Thread-ID: 117019
4 Beiträge
Tabelle in Word einfügen
Carle

Hallo miteinander,
ich stehe vor der an und für sich einfachen Aufgabe (sollte man jedenfalls meinen) eine Tabelle in ein Word-Dokument einzubinden. Ich gehe wie folgt vor: Tabelle wird in Excel markiert und kopiert, dann wechsele ich in das Word-Dokument und gehe auf Bearbeiten/Inhalte ein...
03.01.2011 12:26:59
Thread-ID: 1193638
4 Beiträge
Tool um Tabellenausschnitt in Beitrag einfügen
Stefan

Hallo,
ich habe hier schon versucht einen Ausschnitt aus einer Tabelle einzufügen, weil es mir zur Erklärung meines Problems genauso effizient erschien wie eine Arbeitsmappe hochzuladen. Das hat nicht so geklappt wie ich mir das vorstellte. Jetzt habe ich gesehen, daß Mitarbeiter hier solch...
25.02.2011 11:40:53
Thread-ID: 1202928
5 Beiträge
Eine Tabelle in Code einfügen
David

Hallo,
ich hab dieses Problem hier vor kurzem schon gepostet, aber leider keine Antwort bekommen die funktioniert hat. In dem untenstehenden Code soll eine weitere tabelle "all_data_alt" hinzugefügt werden.
Diese Tabelle soll genauso wie die jetzige Tabelle "all_data_neu" durch das Makr...
11.03.2011 13:47:21
Thread-ID: 1205313
3 Beiträge
Bereich aus Tabellenblat in neue Datei einfügen
Werner

Hallo Excelfreunde
könnt Ihr helfen.Ich habe hier einen Code von Beate Schmitz Geschrieben am: 03.10.2008 23:32:05
1)Der Code kopiert jedoch das Gesamte Blatt und nicht nur den Bereich A1:G48.
2)Wenn ich 'Columns("H:T").Delete aktiviere löscht er die Spalten im Orginalblatt und nich...
29.05.2011 21:14:34
Thread-ID: 1216611
3 Beiträge
Anzeige
Probleme beim Einfügen von Zahlen in meine Tabelle
Zahlen

Hallo alle zusammen,
ich hoffe ihr könnt mir helfen. Ich hoffe es macht nicht allzuviel Mühe.
ich möchte gerne Inhalt einer Tabelle auf einer Internetseite in eine Excel-Tabelle kopieren, mit dem Ziel die Tabelle anders zu sortieren als im Internet dargestellt.
In Spalte B stehen Za...
24.06.2011 19:13:48
Thread-ID: 1219568
3 Beiträge
Zeile aus zwei Tabellenblätter in 3 Tabelle
Kisselstein

Hallo Zusammen,
Ich versuche gerade eine Menge Zeilen aus zwei verschiedenen Tabellenblättern in ein Drittes zu kopieren. Das ist händich ziemlich aufwendig, da es sich um viele Daten handelt, die immer wieder neu erzeugt werden müssen. Deswegen versuche ich greade dies mit VBA zu verbesser...
03.08.2011 09:25:50
Thread-ID: 1224663
12 Beiträge
Tabelle kopieren und in andere Datei einfügen
VBAmateur

Hallo an alle,
nachdem ich mich hier schon mehrfach mit Code bedient habe, möchte ich erstmal allen danken die sich die Mühe machen für "Gottes Lohn" anderen zu helfen.
Für die Lösung meines aktuellen Problems konnte ich leider nicht das richtige finden. Vielleicht können mir die Profis...
11.11.2011 21:33:05
Thread-ID: 1237564
8 Beiträge
Tabelle in word einfügen
Carle

Ahoi!
Ich möchte eine Excel-Tabelle in ein Word-Dok einfügen. Dabei ging ich zuletzt wie folgt vor: Excel-Bereich markieren, kopieren, Wechsel in Word-Dok, Bearbeiten, Inhalte einfügen, Option Verknüpfung einfügen, MS Office Excel-Arbeitsblatt-Objekt, ok. Es erscheint jedoch nur ein grauer...
31.01.2012 14:19:35
Thread-ID: 1248650
2 Beiträge
Entdecke relevante Threads

Schau dir verwandte Threads basierend auf dem aktuellen Thema an

Alle relevanten Threads mit Inhaltsvorschau entdecken
Anzeige

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