Addieren von Zellen aus verschiedenen Tabellenblätter

[ilmiomondo]

Hallo Zusammen,
ich habe eine Excel - Mappe mit 4 Tabellenblätter(M1.M2,M3,M4).
Das Tabellenblatt 4 ist das Auswertungsblatt. In diesem Tabellenblatt werden die Ergebnisse aus M1,M2,M3 zusammengeführt.
Jetzt möchte ich mit VBA folgendes gerne erstellen:
Es soll in M4 und A1 folgendes erzeugt werden.
=('M1'!A1+'M2'!B3+'Z3'!D3)



Nun kann es sein das manchmal ein Tabellenblatt von M1,M2,M3 gelöscht werden muss. Wenn M1 gelöscht werden muss, dann wäre kein Wert bei 'M1' !A1 vorhanden. Kann man dann sagen, dass für diesen Bezug eine 0 erzeugt wird , sodass die Addition trotzdem stattfindet? 


Grüße

[Der Steuerfuzzi]

Hallo,

vielleicht hilft die das weiter: https://www.experto.de/office/excel/3d-s...etter.html

[ilmiomondo]

Hallo Steuerfuzzi,
das hat mir leider nicht weitergeholfen.
ich habe die Datei hochgeladen.
Ich würde es auch gerne ohne Makro machen wenn es geht.
In Tabellenblatt 4 in der Datei ist das Ergebnis dargestellt. Nur das Problem ist wenn ich ein Tabellenblatt von M1-3 lösche dann gehen die Bezüge verloren!
Hat da jemand eine Idee?

Grüße

[Der Steuerfuzzi]

Ich kenne ja die Hintergründe nicht, aber ich würde die Daten so anordnen, dass die aufzusummierenden Werte un den Tabellen jeweils an der gleichen Stelle stehen. Dann die Summ über alle Tabellenblätter  und Fertig. Ein Dummyblatt vor dem ersten und ein Dummyblatt nach dem letzten. Neue dürfen nur dazwischen eingefügt werden, dann bleiben auch die Formeln erhalten.

[WillWissen]

Hi Michael,

das Einfügen neuer Blätter dürfte für den TE kein Problem darstellen. Vielmehr hat er es beim Löschen eines solchen:

Nur das Problem ist wenn ich ein Tabellenblatt von M1-3 lösche dann gehen die Bezüge verloren!

Das ist mit Formeln nicht lösbar - ob ein Makro helfen kann, wisst nur ihr VBA-ler

[ilmiomondo]

Hallo Günter,
danke für die Info. Das habe ich mir schon fast gedacht das es ohne Makro nicht geht
Danke!

[schauan]

Hallöchen,

das Reagieren auf das Löschen eines Blattes geht sehr wohl - siehe A1.
Allerdings geht das so einfach nicht anders rum, der Bezug ist ja weg. Um das zu ermöglichen, wäre eine Formel mit INDIREKT nötig - siehe B1.

Arbeitsblatt mit dem Namen 'Tabelle2'
	A	B
1	0	0

Zelle	Formel
A1	=WENNFEHLER(#BEZUG!A1;0)
B1	=WENNFEHLER(INDIREKT("Tabelle1!A1");0)

Verwendete Systemkomponenten: [Windows (32-bit) NT 10.00] MS Excel 2016

Diese Tabelle wurde mit Tab2Html (v2.6.0) erstellt. ©Gerd alias Bamberg

[Der Steuerfuzzi]

Vielmehr hat er es beim Löschen eines solchen

Nein, mit 3D-Bezügen gibt es weder beim Löschen noch beim Hinzufügen Probleme. Ihr könnt es ja mit der vorn mir bereitgestellten Datei testen.

Alle Blätter zwischen den Blättern A und E werden aufsummiert. Wird eins gelöscht oder hinzugefügt, wird das entsprechend berücksichtigt.