Supportnet / Forum / Tabellenkalkulation

Hallo zusammen . Ich habe ein kleines Problem beim löschen von Spalten: Problembeschreibung: Ich habe 2 Excelblätter: In das erste Blatt werden Daten kopiert. zB von A2 bis I2 Es werden aber nicht alle Daten benötigt, daher lösche ich folgende Spalten heraus: C2,E2,G2,I2. Im zweitem Blatt wird mittels einfacher Summenformel eine Summe über die verbleibenden Spalten genommen. (Diese heißen nach dem löschen A2,B2,C2,D2,E2,F2 weil excel die verbliebenen Spalten nachrückt) Soweit noch kein Problem, aber nun folgt der Haken: Wenn ich nun neuerlich Daten einfüge, die sich wieder in den Spalten wie vorher befinden, anschliessend die überflüssigen Spalten wieder lösche, dann verändert sich auch der Formelinhalt auf der 2ten Seite und es werden nicht mehr alle Daten summiert. Die Formel verändert sich folgendermassen: vor Spalten löschen:" =SUM(Sheet1!A2:I2)" nach löschen " =SUM(Sheet1!A2:E2)" nach 2tem einfügen und Spalten löschen:" =SUM(Sheet1!A2:C2)" Nach 3tem einfügen und löschen:" =SUM(Sheet1!A2:B2)" . Wie kann ich also die Formel im Blatt 2 fixieren, dass sie sich nicht mitändert? . Thanks für eure Antworten und ich hoffe ich habe mein Problem einigermassen verständlich erklärt. . liebe Grüße Marius

Hi Marius,

so wie ich dein problem verstehe, passt sich die Formel der Spalten an. Wenn Du aber immer die gleiche Spalte/Zeile verwenden möchtest, dann musst Du die Spalte/Zeile fixieren.

Versuch mal folgendes

=SUM(Sheet1!$A$2:$I$2)

Gruß
thy

Das mit dem "$" Zeichen hab ich auch schon probiert, hat aber nichts verändert:
Excel kürzt die Fomel trotzdem immer auf die verbleibenden Spalten nach dem Löschen.

@Marius,
wenn Du wieder mal neue Spalten benötigst, dann füge sie mal innerhalb des Summen-Bereiches ein. In Deinem Beispiel zwischen Spalte A und E. Dann sollte solte sich eigentlich auch die Formel entsprechend aktualisieren (erweitern). Vermutlich hast Du einfach die neuen Eingaben ab Spalte F eingetragen, was zu keiner Aktualisierung der Summenformel führte. Löschst Du dann wiederum Spalten zwischen A und E heraus, dann verschiebt sich der Summenbereich immer weiter nach "links", ohne die neuen Wert-Spalten zu beachten.
Ich hoffe, dass ich Deine Frage richtig verstanden hatte.

Ja du hast meine Frage richtig verstanden;
.
Aber ich füge die Daten ein, in dem ich die Spalte A2 anklicke und dann "einfügen" wähle;
Ich füge also mit einem Klick gleich alle Daten auf einmal ein. (Das mit A2-I2 ist nur ein Beispiel: Es werden später ca 400-600Zellen, die ich jedesmal einfüge)
Daher muss ich auch die linke obere Zelle wählen, damit alles in der richigen Position ist nach dem Einfügen.
.
Gruss Marius

Hi Manus,

lösch doch nicht die Spalte, sondern nur den Inhalt der Spalten. Somit bleibt die Spaltenzahl immer bestehen.

mfg Knubbel

Dann hab ich aber lauter leere Spalten und somit wird das Dokument viel zu breit, dass man es vernünftig lesen könnte.
Es muss doch irgend einen Hint geben, dass man eine Formel fixiert,oder?
.
Gruss Marius

Dann lösche doch die leeren Spalten nicht, sondern blende sie aus.

mfg Knubbel

Dann würden diese Spalten aber auch beim nächstem einfügen von Daten ausgeblendet bleiben, was zur folge hätte, dass man vielleicht relevante Daten nicht sehen kann.
.
Das Excel File wird in Zukunft nicht von mir bedient, daher sollten solche Fehlermöglichkeiten ausgeschlossen werden.
.
Aber THX für deine Bemühungen und schnellen Antworten
.
Gruss Marius

Salve Whiteberg,

ich glaube, das verlangt nach einer vba-Lösung, die auf Knopfdruck im zweiten Blatt Deine Summenformeln
=SUM(Sheet1A2:I2) einfügt.
Dazu zählt man im ersten Blatt die Anzahl der Zeilen, läuft eine entsprechende Schleife, in der im zweiten Blatt die gleiche Anzahl Summenformeln eingefügt werden.
Du kannst dann im ersten Blatt machen, was Du willst, anschließend nur Makro laufen lassen, fertig.

Sub SummenEinfügen()
'Summenformel in Tabelle2 ab A2 einfügen für alle Werte aus Tabelle1 im Bereich A:I
Dim AnzZeilen As Long
Dim i As Long
Sheets("Tabelle1").Activate
AnzZeilen = ActiveSheet.UsedRange.Rows.Count
Sheets("Tabelle2").Activate
Range("A2").Activate
For i = 2 To AnzZeilen
    ActiveCell.FormulaR1C1 = "=SUM(Tabelle1!RC:RC[8])"
    ActiveCell.Offset(1, 0).Activate
Next
End Sub

Du mußt nur "Tabelle1" und "Tabelle2" durch Deine Tabellennamen ersetzen.
Am Besten legst Du für das Makro einen Button in Deiner Mappe an. wie das geht, steht glaub ich schon im Forum, sonst bitte nochmal melden.

mfg
schnallgonz

THX für deine Hilfe; Funktioniert einwandfrei.
.
So nebenbei: Ich habe noch eine andere Lösung ohne VBA gefunden:
=SUM(INDIRECT("Sheet1!A2:I2"))
Mit Indirect wird die Formel auch nicht verändert.
Aber da ich sowieso mich etwas intensiver mit Makros beschäftigen möchte, werde ich deine Lösung verwenden.
.
THX und liebe Grüße an alle Helfer
Marius

Moin Marius,

Danke für Deine Rückmeldung und die "INDIRECT"-Lösung, kannte ich noch nicht.

MfG
schnallgonz

• Bedingte Formatierung für ganze Spalten
• Nullen in Zellen und Spalten löschen !!!
• Exel spalten löschen und leere Spalten mit 0 füllen