Clever-Excel-Forum

Normale Version: bestimmte Blattauswahl indexieren + Formel für Zell Bezug - WENN
Du siehst gerade eine vereinfachte Darstellung unserer Inhalte. Normale Ansicht mit richtiger Formatierung.
Servus,

ich bräuchtebitte  ein Index, aber nur von bestimmten Tabellenblättern und das geht wohl wieder nur über einen VBA Code und das kann ich mal garnich :(


man könnte es in soweit begrenzen, das man sagt, alle Tabellenblätter indexieren, die zwischen den Tabellenblättern : "Tabbelle_xy" und Tabelle_ze" liegen.

Die Reihenfolge ist an sich egal. Kann aber gern so sein wie die Reiter unten aufgelistet sind.


und folgende Formel müsste in soweit geändert werden, dass er in der ganzen Spalte D nach dem Wert sucht und dann den Wert von der Nachbarzelle einfügt
=SUMMEWENN(R!D14;"Lox";R!C14)

hab schon rumgebastelt in dem ich andere Formeln die ähnlich sind abgeändert oder mit anderen kombiniert hab, aber das haut leider nich so wie ICH Möchte ^^

hoffe ihr könnt mir da helfen, Danke schonmal
Gruß
Stefan
Hallo Stefan,

das was Du womöglich suchst, könntest Du hier finden: http://www.herber.de/excelformeln und bitte suchen .../formeln.html?welcher=342

Allerdings würde ich es so nicht handhaben. Viel einfacher ist es, Du suchst Dir eine Zelle aus, die in allen den auszuwertenden Tabellenblättern frei ist und anderweitig auch bleibt und ermittelst in dieser Zelle tabellenblattbezogen Dein SUMMEWENN().

Anschließend ermittelst mit der 3D-Summenfunktion (mehr dazu sieh mal hier: http://www.herber.de/excelformeln und bitte suchen .../formeln.html?welcher=206) auf diese Deine Hilfszelle dann die Gesamtsumme.
hi und danke erstmal für die Antwort.
die beiden links habe ich mir angeschaut, aber leider haben sie mir nicht so ganz weiter geholfen.

hab mitlerweile aber eine Formel die genau das bewirkt was ich wollte.

jetzt bräucht ich nur noch den VBA Code damit mir alle Tabellenblätter in einer Tabelle angezeigt und auch automatisch aktualisert werden.
die sachen wo ich im internet finde, funktionieren entweder nicht bei meinem alten excel oder die Tabelle aktualisiert sich nicht ::(

ich werd einfach mal weiter suchen, wenn jemand aber einen code übrig hat für mich, nehm ich ihn gerne ^^
ohne hypterlinks und einfach nur in einer spalte alle Tabellenblätter auflisten, schlicht und einfach ;;)
Moin,

Öffne mit Alt+F11 den VBA-Editor
Wähle in Projekt - VBAProjekt 'DieseArbeitsmappe'
füge diesen Code ein
Code:
Sub sheetsauflisten()
Dim i As Integer
For i = 1 To Sheets.Count
   Sheets(i).Activate
  Sheets(1).Cells(i, 1) = Sheets(i).Name
Next
Sheets(1).Activate
End Sub

Aufruf mit Alt+F8
Schreibt alle vorhandenen Tabellen-Namen in Tabelle1 erste Spalte

Automatisch aktualisieren tut das nicht, ich wollte das nicht, schon gar nicht bei Excel 2003; ist aber schnell aufgerufen und aktualisiert.
Wie oft pro Sekunde ändert sich die Anzahl der Tabellen?
(04.02.2018, 21:44)lion7123 schrieb: [ -> ]ich werd einfach mal weiter suchen, wenn jemand aber einen code übrig hat für mich, nehm ich ihn gerne ^^
ohne hypterlinks und einfach nur in einer spalte alle Tabellenblätter auflisten, schlicht und einfach ;;)

Moin!
Warum per VBA???
Per Hyperlink ist es simpel:
  • Einfügen, Namen, definieren ...
  • Name: x
  • bezieht sich auf:
  • =ARBEITSMAPPE.ZUORDNEN(1+0*JETZT())
  • in A1 folgende Formel:
=WENN(ZEILE(A1)>ANZAHL2(x);"";
 HYPERLINK("#'"&INDEX(x;ZEILE(A1))&"'!A1";
 TEIL(INDEX(x;ZEILE(A1));FINDEN("]";INDEX(x;ZEILE(A1)))+1;31)))
Formel großzügig nach unten ziehen.
Fertig!

Gruß Ralf
Servus,
also erstmal wieder danke Ihr habt mir wieder einmal, eine menge Arbeit ersparrt.

Der VBA Code funktioniert und alle zwei Wochen ändert sich die Reihenfolge. von daher ist es nicht schlimm das Makro per Tastendruck auslösen zu müssen.

@RPP63
das ganze habe ich schon gefunden, habe auch gehofft dadurch nicht wieder euch um Hilfe bitten zu müssen sondern es mal alleine zu schaffen.

leider kann ich dann nicht wie durch die Formel den Wert aus der Zelle anzeigen lassen weil dann nur die Formel angezeigt wird.
mit dem VBA Code funktioniert das ganze aber jetzt tadellos.

aber trozdem danke für die Antwort und evtl. würde es ja doch funktionieren was ich aber leider nicht geschafft hab.


Tausend dank an alle

Gruß Stefan