Viele Register (Reiter) in einer Übersicht zusammenfassen

Question

Hallo zusammen,

ich bin mir sicher, ihr könnt mir helfen!!! ;-)

Habe hier eine Excel-Datei mit ziemlich vielen Reitern. Gibt es eine einfache Möglichkeit, am Besten ohne VBA, mit der ich all diese Registernamen auf einem neuen Reiter zusammenfassen kann? Quasi als Zusammenfassung?

Wäre supi, wenn Ihr mir helfen könntet.

Vielen lieben Dank im Voraus!

Eure
DasMo1980

Answer 1

Wie meinst du das?
Natürlich könntes du ein neues Blatt (mit neuem Reiter) erzeugen und da Links zu allen anderen Blättern reinschreiben - aber sehr sinnvoll erscheint mir das nicht.

Answer 2

Hey Nostalgiker6,

vielen Dank für deine Antwort. Ob das wirklich sinnvoll ist oder nicht, das ist doch in diesem Fall egal, oder? Es wird gewünscht.

Eine richtige Verlinkung muss es auch nicht sein, es soll nur eine Übersicht der enthaltenen Reiter sein. Es gibt da eben mehrere Dateien und es ist einfacher, nur auf ein Blatt zu schauen, als alle Reiter durchzugehen...

Gruß
DasMo1980

Answer 3

Ich zweifle ja nur, ob meiner Antwort das richtige Verständnis deiner Frage zugrundeliegt. Di ist nämlich IMHO äusserst unklar formuliert: Was meinst du mir "Zusammenfassen"?

Sollte meine Antwort doch passen, dann hättest du es ja wahrscheinlich erwähnt, oder?

Answer 4

Du möchtest also nur die Namen der einzelnen Tabellenblätter in einem Blatt am Ende oder Anfang gesammelt haben?

meine dilettantische idee ist auch noch umständlich, aber besser als alle abtippen:

doppelcklick auf den Tabellennamen, strg c , strg v im gewünschten Feld.

alle Tabellen untereinander aufgelistet findest du, wenn du rechts auf den tabellennamen klickst und im menü "code anzeigen" wählst. um da was markieren zu können, musst du die aber wieder alle einzeln anklicken.

Answer 5

Hallo,

Gibt es eine einfache Möglichkeit, am Besten ohne VBA

.... nein, zumindest keine einfachere.

Falls Du an eine Makro interessiert bist, melde Dich.

Gruß
Rainer

Answer 6

Hallo Rainberg,

kannst du mir das mit dem VBA auch verständlich erklären? Sprich, wo und wie?

Meine Kenntnisse von VBA sind echt nicht nennenswert... :-(

Bräuchte aber dennoch Hilfe, sonnst muss ich alles händisch machen und bin dann Stunden beschäftigt....

Dank dir!

Gruß

DasMo1980

Answer 7

Hallo,

Option Explicit

Sub Namen_auflisten()
Dim intI As Integer
ActiveWorkbook.Sheets.Add Before:=Worksheets(1)
ActiveSheet.Name = "Übersicht"
For intI = 1 To Worksheets.Count
Range("A" & intI) = Worksheets(intI).Name
Next
End Sub

- öffne die relevante Arbeitsmappe und drücke die Tastenkombi [Alt+F11]
- es öffnet sich der VBA-Editor
- im linken Fenster ist Deine Arbeitsmappe mit den Baum aller Arbeitsblätter aufgelistet
- markiere dort den Eintrag "DieseArbeitsmappe"
- wähle im Menü "Einfügen" des VBA-Editors den Eintrag "Modul"
- es öffnet sich rechts ein neues Fenster, in welches Du, den vorher kopierten, obigen Code einfügst
- betätige das Schließkreuz des Editors um wieder in den Excelteil der Arbeitsmappe zu gelangen.

Wenn Du alles richtig gemacht hast kannst Du nun das Makro mit dem Namen "Namen_auflisten" starten.

Das Makro erzeugt ein neues Arbeitsblatt mit den Namen "Übersicht" und listet dort in Spalte A alle Arbeitsblatt-Namen der Arbeitsmappe auf.

Gruß
Rainer

Answer 8

For intI = 1 To Worksheets.Count

Nur so gefragt: da ich mich ja selbst auf "Übersicht" aufhalte wäre es doch obsolet dieses Blatt ("Reiter") mitzunehmen - ich würde daher oben ab 2 zu zählen beginnen.

Answer 9

Guten Morgen Rainberg!

Vielen lieben Dank für das Makro!!!!!!!!!!!!!!!!! Hat super funktioniert!!!!

Wie gesagt, 1000 Dank!!!!!!!!!!!!!!!

Lieben Gruß
DasMo1980

Answer 10

Hallo ErikMarch,

Nur so gefragt:

... wem gilt diese Frage mit der echt konstruktiven Antwort?

In diesem Forum ist es nicht verboten in einem Beitrag eine Anrede und einen winzigen Gruß zu verwenden.

Gruß
Rainer