automatisch addieren nach Tabellenblatt

[lion7123]

servus mal wieder :)

mal ne Frage, ist es möglich eine Formel oder Code zu machen der folgendes kann.

auf Tabellenblatt 1 in Zelle x steht zb die zahl 5.

ist es möglich das alle Tabellenblätter in der AKTUELLEN Reihenfolge immer +1 rechnen.

somit wäre tabellenblatt 2 in Zelle x die Zahl 6
Tabellenblatt 3 Zelle x die Zahl 7 etc

aber der Code müsste sich immer auf den Reiter davor beziehen da sich die Reihenfolge einmal im Monat ändern kann..


wenn also mal das Tabellenblatt 6 vor Tabellenblatt 2 steht, darf in diesem fall auch nur +1 zu der Zahl in Tabellenblatt 1 addiert werden.

Tabellenblatt 1 -  Zelle x  Wert 5 (manuelle eingabe)
Tabellenblatt 6 - Zelle x  +1  = 6
Tabellenblatt 2 - Zelle x  +1 =  7

Hoff ich habs einigermasen gut beschrieben.
Gruß

[RPP63]

Moin Gruß!

aber der Code müsste sich immer auf den Reiter davor beziehen da sich die Reihenfolge einmal im Monat ändern kann..

Geht nur mittels VBA, da Du dort auf den Index des Blattes Bezug nehmen kannst.

Gruß Ralf

[lion7123]

ist das viel arbeit?  bzw könnte mir denn wer machen? 
ich hab von vba leider null Ahnung 

würde dann den richtigen zellbezug noch nachreichen

[RPP63]

würde dann den richtigen zellbezug noch nachreichen

Findest Du nicht, dass anders herum ein Schuh daraus würde?
Lade also eine Datei hoch, die im Aufbau exakt Deiner Arbeitsdatei entspricht.
Und nein, viel Arbeit ist das nicht, ich möchte aber am Patienten überprüfen, ob er die Operation überlebt.  :21:

Gruß Ralf

[Käpt'n Blaubär]

Hallo Ralf,

Findest Du nicht, dass anders herum ein Schuh daraus würde?
Lade also eine Datei hoch, die im Aufbau exakt Deiner Arbeitsdatei entspricht.

... da klatsche ich jetzt mal ungebremst Beifall.

[Rabe]

Hi Ralf,

Geht nur mittels VBA, da Du dort auf den Index des Blattes Bezug nehmen kannst.

es könnte auch ein Name definiert werden:
Reiterlinks:   =TEIL(INDEX(ARBEITSMAPPE.ZUORDNEN(1+0*JETZT());DATEI.ZUORDNEN(87)-1);FINDEN("]";INDEX(ARBEITSMAPPE.ZUORDNEN(1+0*JETZT());DATEI.ZUORDNEN(87)-1))+1;100)

dann in einer Zelle diese Funktion aufrufen:
=INDIREKT(Reiterlinks&"!F43")+1

statt F43 dann Deine "Zelle x" schreiben.

Ist, glaube ich, eine Excel4Makro-Funktion.



Dezember

	J	K
40	#BEZUG!	=INDIREKT(Reiterlinks&"!F43")
41

verwendete Formeln
Zelle	Formel	Bereich	N/A
J40	=INDIREKT(Reiterlinks&"!F43")

definierte Namen
Name	Bezieht sich auf	Tabelle	Z1S1-Formel
Reiterlinks	=TEIL(INDEX(ARBEITSMAPPE.ZUORDNEN(1+0*JETZT());DATEI.ZUORDNEN(87)-1);FINDEN("]";INDEX(ARBEITSMAPPE.ZUORDNEN(1+0*JETZT());DATEI.ZUORDNEN(87)-1))+1;100)		=MID(INDEX(GET.WORKBOOK(1+0*NOW()),GET.DOCUMENT(87)-1),FIND("]",INDEX(GET.WORKBOOK(1+0*NOW()),GET.DOCUMENT(87)-1))+1,100)

Excel-Inn.de

Hajo-Excel.de

XHTML-Tabelle zur Darstellung in Foren, einschl. der neuen Funktionen ab Version 2007

Add-In-Version 19.08 einschl. 64 Bit

Anstelle von #Bezug! steht dann die korrekte Zahl dort.

[RPP63]

Ist klar, Ralf!
.ZUORDNEN verlangt ohnehin eine Speicherung als .xlsm (oder *b).
Dann aber gleich "richtig". ;)

Gruß vom Namensvetter!

[Rabe]

Hi,

verlangt ohnehin eine Speicherung als .xlsm (oder *b).

ich habe eh standardmäßig das xlsb drin, weil mir auch noch keiner einen Nachteil zeigen konnte gegenüber xlsx und xlsm.

[lion7123]

wow danke erstmal für die ganzen antworten ...

muss nur gestehen das ich noch das alte aber von mir geliebte excel 2003 habe... ich hasse diese neue ansicht ;)

also wirds wohl doch auf ein vba code rauslaufen wenn ich euch richtig verstanden habe...

ich mach jetzt dann glei die datei fertig und lad sie hoch ... ist kein problem nur einer mag es so der andere so ;)

tausend dank schonmal für eure mühe ^^

[lion7123]

so bitte hier die testmappe für euch