Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
648to652
648to652
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Anzeige
Inhaltsverzeichnis

Mehrfache Einträge in eine Zelle, aufsummiert

Forumthread: Mehrfache Einträge in eine Zelle, aufsummiert

Mehrfache Einträge in eine Zelle, aufsummiert
08.08.2005 13:05:00
Chris
Tach, ich würde gerne in eine Zelle mehrfach einen Wert eingeben. Die Zelle sollte nach Eingabe des Wertes wieder leer erscheinen. Die Zelle ist Bestandteil einer Formel, d.h. der Wert wird "verrechnet". Bei erneuter Eingabe eines Wertes in die Zelle sollte also der neue Wert zum Alten dazu summiert werden und entsprechend auch in der Formel verwendet werden. danke für Eure (allfällige) Hilfe :-D
Anzeige

14
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Mehrfache Einträge in eine Zelle, aufsummiert
08.08.2005 13:15:56
Galenzo 

Private Sub Worksheet_Change(ByVal Target As Range)
If Not Target.Address = "$A$1" Or IsEmpty([a1]) Then Exit Sub
[b1] = [b1] + [a1]
[a1].ClearContents
End Sub

Viel Erfolg!
AW: Mehrfache Einträge in eine Zelle, aufsummiert
08.08.2005 14:12:48
Chris
Jou, das ging ja flott, danke. Aber die eine oder andere Erklärung dazu hätte ich schon noch nötig... :-s. Welche Bedeutung haben z.B. a1 und b1 im Script? Danke...
Anzeige
AW: Mehrfache Einträge in eine Zelle, aufsummiert
08.08.2005 14:58:46
Galenzo
[A1] ist die verkürzte Schreibweise für Range("A1")
das ist hier die Zelle, in der die Eingabe erfolgt.
Range("B1") ist DIE Zelle, in der summiert wird.
Beide Zelladressen kannst du für deinen Fall entsprechend anpassen.
(und nicht das $A$1 vergessen!)
Viel Erfolg!
AW: Mehrfache Einträge in eine Zelle, aufsummiert
08.08.2005 16:23:20
Chris
Super! Funzt einwandfrei, auch ändern der Zelle ist kein Prob. Nur bloss... Ich hatte in der Zelle E4 vorher ne Formel (=B4-C4+D4). Diese Formel soll bleiben und zusätzlich sollten halt C4 und D4 in der oben beschriebenen Art sein, also Eingabe, dann die Zelle wieder leer, und weitere Werte in die jeweiligen Zellen dazu summieren (und dann natürlich auch die entsprechenden Auswirkungen in der Formel). Wäre froh für weitere Aufklärung, danke!
Anzeige
sorry, das versteh ich nicht..
08.08.2005 17:41:28
Galenzo
..ich habe die Beschreibung jetzt 3x gelesen ohne zu verstehen, was du erreichen willst...
AW: sorry, das versteh ich nicht..
08.08.2005 17:53:46
Chris
ok, dann versuch ich mal mich etwas verständlicher auszudrücken...Ich will ne "Lagerverwaltungstabelle" erstellen. In Zelle E4 berechne ich den Bestand. Ergo Bestand (E4) ist gleich Anfangsbestand (B4) minus Abgänge (C4) plus Zugänge (D4). Ab- und Zugänge sind ja ständig ein- bzw. auszubuchen; folglich sollten halt Zellen C4 und D4 so gestaltet sein, dass ich einen Wert eingeben kann und dies in der Formel in E4 entsprechend ausgerechnet wird. Da ja weitere Zu- und Abgänge zu verbuchen sind, möchte ich, wie ursprünglich anfangs Thread erfragt, dass die Zellen C4 und D4 nach der ersten Werteeingabe wieder leer erscheinen und weitere Werte (Zu-/Abgänge) eingegeben werden können. Diese Werte müssen ja dann aber auch wieder in Zelle E4 und der Formel dort verrechnet werden und werden im Prinzip ja denn vorherigen Zu- und Abgängen dazu addiert. So, ich hoffe das mein Problem jetzt verständlicher ist :-s
Anzeige
AW: sorry, das versteh ich nicht..
09.08.2005 12:45:24
Chris
*Frednachobenbring*
AW: Mehrfache Einträge in eine Zelle, aufsummiert
09.08.2005 13:13:16
Volker
Hallo Chris,
Zelle "B1" dient in Galenzo's Code als Zwischensumme, anders geht's nicht.
D.h. ,deine Formel muß also "B1" mit den anderen Werten summieren.
Wo die Zwischensumme letztendlich steht ist egal. Wenn sie im vorderen Bereich der Tabelle stört, kannst du auch Spalte IV nehmen.
Wenn ich dich richtig verstanden hab, hast du 2 Eingabewerte (C4 und D4) die aufsummiert und wieder gelöscht werden sollen. In deinem Fall braucht du also 2 Zwischen summen, in meinem Bsp in Y4 und Z4

Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Address = "$c$4" and not IsEmpty([c4]) Then
[y4] = [y1] + [c4]
[c4].ClearContents
elseIf Target.Address = "$d$4" and not IsEmpty([d4]) Then
[z4] = [z1] + [d4]
[d4].ClearContents
End Sub

Deine Formel in E4 sollte dann (=B4-y4+z4) lauten.
Gruß
Volker
Anzeige
Korrektur:
09.08.2005 13:16:33
Volker
es muß natürlich y4 statt y1 und z4 statt z1 heißen.
AW: Mehrfache Einträge in eine Zelle, aufsummiert
09.08.2005 14:26:40
Chris
Jo, danke erstmals. Im Code scheint irgendwie noch der Wurm drinn zu sein. Ich krieg "Compile Error: Block IF without Endif". Wie weiter? :-D
AW: Mehrfache Einträge in eine Zelle, aufsummiert
09.08.2005 16:11:31
Volker
Hallo Bernd,
kleiner Fehler meinerseits: for dem "End Sub" muß "End If" stehen
Gruß
Volker
Anzeige
AW: Mehrfache Einträge in eine Zelle, aufsummiert
09.08.2005 16:15:12
Volker
Hallo Bernd,
kleiner Fehler meinerseits: for dem "End Sub" muß "End If" stehen
Gruß
Volker
AW: Mehrfache Einträge in eine Zelle, aufsummiert
09.08.2005 18:33:31
Chris
Heureka! Das funzt jetzt so wie ich mir das vorgestellt habe, danke nochmals.
Freut mich, wenn's klappt.....
09.08.2005 18:37:50
Volker
....dann kann ich ja jetzt beruhigt Feierabend machen ;-)
Gruß
Volker
Anzeige

Forumthreads zu verwandten Themen

AW: Update: Dynamische Listen & auto. Anpassung
Dip

Hallo Allerseits,
Für die folgende Problemstellung würde ich gerne um Eure Unterstützung bitten.
In der folgenden Datei:
https://www.herber.de/bbs/user/88856.xlsx
stehen im Blatt "Legende" die Quellwerte. Dort werden die Auswahlwerte für die Dropdownlisten verwaltet.
Im Bla...
27.01.2014 12:07:13
Thread-ID: 1346821
3 Beiträge
Ändern von Zellbezügen per Makro
Zellbezügen
Hi,
ich habe zwei Tabellenblätter "Blatt1" und "Referenz".
In jeder Zeile von Blatt1 stehen die gleichen Formeln mit Bezügen auf verschiedene Zellen jeweils EINER bestimmten Zeile des anderen Tabellenblatts "Referenz".
Bsp. Blatt1 hat 5 Zeilen:
In Zeile1 stehen die Überschriften
...
10.04.2022 15:05:00
Thread-ID: 1879085
4 Beiträge
Anzeige
Zelleinträge in Spalten aufteilen
Thomas

Hallo,
mir stehen mehrere tausend Datensätze nur als zeilenweise Zelleinträge zur Verfügung, obwohl jeder einzelne Datensatz mehrere und auf Spalten aufzuteilende Daten enthält (z.B. aus Eintrag A1 soll Eintrag A1, B1, C1, D1, E1, F1 werden).
Format der Datensätze:
=================...
07.12.2004 16:11:56
Thread-ID: 529253
6 Beiträge
Hyperlink auf Zelle mit Funktion
Thomas

Hallo Leute
Ich würde gern einen Hyperlink auf einer Zelle anwenden, wobei der Link zu den Feldern springen soll, die aus der ZÄHLENNWENN-Funktion hervorgehen, aber um 1 oder 2 Zellen nach links verschoben.
Sprich: In Blatt1 ist ein Bereich in dem irgendwo ein oder mehrere Daten (plural...
07.01.2008 16:54:28
Thread-ID: 939394
4 Beiträge
Anzeige
Positionierung mehrerer Comboboxen - Abstände?
Chris

Hallo zusammen,
in einem Tabellenblatt werden mehrere Comboboxen erstellt (ein Dankeschön nochmal an das Forum bzw. an Erich G.).
Soweit so gut, klappt hervorragend.
Was mich allerdings irritiert, ist die Positionierung der Comboboxen bzw. ihr Abstand zueinander.
Ich weiß nicht,...
19.11.2006 20:40:28
Thread-ID: 821302
5 Beiträge
Anzeige
Marko mit Werteeingabe links + Farbe
Jens
Hi@All
Ich benötige mal wieder eure Hilfe.
Aktuell muss ich in mehreren Zellen und Spalten die Hintergrundfarbe ändern (Grün,Gelb,Rot) und in den zwei Spalten links von der aktiven Zelle je nach Vorgabe 0 bzw 1 eintragen (ist für weitere Berechnungen/Formeln notwendig)
Nun würde ich mir...
07.11.2022 13:38:09
Thread-ID: 1906120
3 Beiträge
Sheet aus anderer Datei Einfügen mit Abfrage
Andrea

Möchte gern mit einem Makro folgendes realisieren.
1.Datei Explorer öffnen und dort eine xlsx. auswählen und diese Datei öffnen.
2.In dieser Datei befindet sich ein Arbeitsblatt „Tabelle1“, was Kopiert und in meine aktuelle Arbeitsmappe ganz links als erstes Sheet eingefügt aber Umbena...
03.01.2020 23:00:43
Thread-ID: 1731867
15 Beiträge
Hyperlink einfügen
Erich

Hallo EXCEL-Freunde,
ich erstelle in einem Tabellenblatt eine Übersicht aller Sheets der Datei
und unterlege diese mit einem Hyperlink:
'Laufende Blattnummerierung + Blattname einfügen
For Each blatt In Sheets
Sheets("Inhaltsverzeichnis").Cells(zeile, 1).Value = "Blatt " &am...
14.08.2004 15:23:42
Thread-ID: 469630
6 Beiträge
Zellbezug automatisch generieren
Peter
Hallo Alle miteinander.
Ich möchte gerne eine Übersichtstabelle automatisieren, aber leider kann ich keinen Zellbezug "automatisch" generieren.
Es gibt einen relativ festen Pfad für den Zellbezug, nur muss ein Ordner aus dem Inhalt zweier Zellen "zusammengebastelt" und der Endgültige Dateina...
15.02.2023 11:13:15
Thread-ID: 1920336
4 Beiträge
in WENN-Formel Link 2 * einbinden mit Zellbezug
Holger

Hallo,
gegeben sei eine Exceltabelle, wo in Feld D8 ein Wert von 0 € steht, wenn ich für eine Dienstleistung meines Unternehmens keine Fahrtkosten berechnet habe. Je nach Anfahrtstrecke steht in Zelle D8 ein Wert wie etwa 3 €.
Ich möchte nach der Datenerfassung in der Kundenübersichts-T...
15.05.2012 22:24:18
Thread-ID: 1263604
4 Beiträge
Anzeige
Jetzt das Excel-Portal bewerten: Deine Stimme zählt!
Anzeige
Anzeige
Live-Forum - Die aktuellen Beiträge
Datum
Titel
17.05.2026 19:23:24
VBA - Blattschutz lässt sich mit Code nicht ausschalten
17.05.2026 13:47:03
Laufende Uhrzeit in einer Zelle
14.05.2026 13:31:09
Zeichen ausblenden
14.05.2026 09:50:42
Makro für MacOs
13.05.2026 19:14:18
Gleichheitszeichen
Keine passende Antwort im Forumarchiv gefunden?
Stelle deine Frage im Live-Forum