Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
668to672
668to672
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Blattname per Makro einfügen????

Forumthread: Blattname per Makro einfügen?

Blattname per Makro einfügen?
22.09.2005 10:23:57
ralle
Hallo Forum.
Ich möchte ein Makro schreiben, dass folgendes ausführt:
Ich habe mehrere Tabellenblätter (Anzahl unterschiedlich), nun soll im letzten Tabellenblat in der Spalte A der sheetname der vorherigen Tabellenblätter eingetragen werden (Per Makro).
Kann mir da jemand helfen?
Gruß
ralle
Anzeige

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

Betreff
Datum
Anwender
Anzeige
AW: Blattname per Makro einfügen?
22.09.2005 10:30:47
Hajo_Zi
Hallo ralle,
warum VBA?
ein Beispiel von Boris
https://www.herber.de/bbs/user/26832.xls
Bitte keine Mail, Probleme sollten im Forum gelöst werden.
Microsoft MVP für Excel
Das Forum lebt auch von den Rückmeldungen.
Betriebssystem Windows 2000 SP4 und Excel Version 2000 SP3.

Homepage
Anzeige
AW: Blattname per Makro einfügen?
22.09.2005 10:34:54
Heiko
Hallo Rall,
hier ne VBA Lösung:

Sub TabNamen()
Dim wksSheets As Worksheet
Dim lngi As Long
lngi = 1
For Each wksSheets In ActiveWorkbook.Worksheets
Worksheets(ActiveWorkbook.Worksheets.Count).Cells(lngi, 1) = wksSheets.Name
lngi = lngi + 1
If lngi = ActiveWorkbook.Worksheets.Count Then Exit Sub
Next wksSheets
End Sub

Gruß Heiko

PS: Rückmeldung wäre nett !
Anzeige
Danke!!!!!! o.T.
22.09.2005 10:57:58
ralle
.
;

Beliebteste Forumthreads (12 Monate)

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