Live-Forum - Die aktuellen Beiträge
Anzeige
Archiv - Navigation
1232to1236
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
Inhaltsverzeichnis

Blattname zw. zwei deffinierten Blätter auslesen

Blattname zw. zwei deffinierten Blätter auslesen
Kai
Hallo zusammen,
hab mal wieder ein kleines Problem:
In meinem Mappe habe ich ein paar Tabellenblätter drin.
Das erste Tabellenblatt ist praktisch nur ein Deckblatt.
Das zweite Tabellenblatt heisst "START" und dient nur der Optik (Trenner)
Das nächste heisst "STOP" und ist ebenfalls nur ein Trenner.
Danach kommen ein paar Blätter mit Daten.
Auf meinem Deckblatt möchte ich nun sehen, welche Tabellenblätter sich zwischen dem Blatt "START" und "STOP" befinden.
Das soll so aussehen:
Wenn ich eines dieser Datenblatt , zB "Bestand" mit der Maus manuell zwischen "START" und "STOP" schiebe, dann soll auf meinem Deckblatt in Zelle M4 der Name dieses Deckblatt erscheinen, also "Bestend"
Schiebe ich ein weiteres Blatt zwischen "START" und "STOP" soll dieses zweite Blatt in der Zelle O4 als Name erscheinen.
Schiebe ich ein weiteres Blatt zwischen "START" und "STOP" soll dieses zweite Blatt in der Zelle Q4 als Name erscheinen.
Anders herum, wenn ich ein Blatt wieder heraus Nehme, soll der Blattname aus der Zelle wieder verschwinden.
Frage: kann man in die Zellen M4, O4, Q4, S4 .... irgend wie eine Formel schreiben, die sich jeweils den nächsten Blattname , der sich zwischen "START" und "STOP" befindet, holt.
Also, wenn es zwischen "START" und "STOP" kein Blatt gibt, sind alle Zellen leer,
Schiebe ich das erste Blatt zwische die beiden, erscheint es in M4
Schiebe ich ein zweites Blatt zwischen die beiden, erscheint es in O4
usw.
Ich hoffe ich konnte mein Problem einigermasen beschreiben.
Sonst noch mal fragen.
Danke
Kai

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

Betreff
Benutzer
Anzeige
AW: Blattname zw. zwei deffinierten Blätter auslesen
11.10.2011 15:24:41
Piet
Hallo Kai,
mit einer Formel geht das leider nicht, da wirst du wohl ein Makro brauchen. Und leider gibts auch kein Ereignis, mit dem man das Makro hübsch von alleine starten lassen kann... Trotzdem biete ich dir mal meinen Code an:
Sub Deckblatt_ausfuellen() Dim i As Integer, s As Integer s = 1 For i = Sheets("START").Index + 1 To Sheets("STOP").Index - 1 Sheets("Deckblatt").Cells(4, 11 + (s * 2)).Value = Sheets(i).Name s = s + 1 Next i End Sub dann allerdings musst du leider jedesmal vor dem Ausführen erst alle betreffenden Zellen ausleeren, weil das Makro zur Laufzeit nicht wissen kann, wieviele Zellen beim letzten Lauf befüllt worden sind. Den Schritt könnte man auch automatisieren, aber dann löscht er stur immer jede zweite Zelle, auch wenn du die vielleicht für was anderes benutzen und den Inhalt nicht gelöscht haben möchtest.
Gruß
Piet
Anzeige
Übersichtlicher wird es, wenn ...
11.10.2011 17:05:58
Josef

... ein paar Namen definiert.
Deckblatt

 ABC
2   
3   
4 Tabelle2 
5 Tabelle3 
6   
7   
8   
9   
10   
11   
12   

Formeln der Tabelle
ZelleFormel
B4{=WENN(ISTFEHLER(KKLEINSTE(WENN((_Count>_Start)*(_Count<_Stop); _Count); ZEILE(A1)+JETZT()*0)); "";INDEX(_TS;KKLEINSTE(WENN((_Count>_Start)*(_Count<_Stop); _Count); ZEILE(A1))))}
Enthält Matrixformel:
Umrandende
{ } nicht miteingeben,
sondern Formel mit STRG+SHIFT+RETURN abschließen!
Matrix verstehen
Namen in Formeln
ZelleNameBezieht sich auf
B4_Count=ZEILE(Deckblatt!$A$1:INDEX(Deckblatt!$A:$A;ANZAHL2(_tab)))
B4_Start=VERGLEICH("Start";_TS;0)
B4_Stop=VERGLEICH("Stop";_TS;0)
B4_tab=ARBEITSMAPPE.ZUORDNEN(1)
B4_TS=TEIL(_tab;FINDEN("]";_tab)+1;32)
Namen verstehen


Excel Tabellen im Web darstellen >> Excel Jeanie HTML 4

« Gruß Sepp »

Anzeige

305 Forumthreads zu ähnlichen Themen

Anzeige
Anzeige
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige