Live-Forum - Die aktuellen Beiträge
Datum
Titel
26.04.2024 21:51:33
Idee für Grafik
26.04.2024 21:29:07
PQ zufällige Reihenfolge
26.04.2024 17:18:47
Große Datenmenge in komplexes Diagramm verpacken
26.04.2024 16:22:47
Aktualisierung Verknüpfung bei geschlossener Quelldatei
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
1732to1736
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
1732to1736
1732to1736
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Eingabe Wert - Nachbarzelle addieren und leeren

Eingabe Wert - Nachbarzelle addieren und leeren
21.01.2020 07:46:31
Michael
Guten Morgen an alle,
ich habe Heute folgendes Problem. Ich möchte gern eine fortlaufende Addition wie folgt erzielen.
In Zelle B2 soll immer der aktuelle Wert stehen - beginnend mit 0.
In Zelle B3 möchte ich einen Wert eingeben z.B. 212
Sobald ich die Enter Taste betätige soll er in der selben Zelle bleiben
und den Wert von B3 (212) zur Zelle B2 addieren. Bei -212 entsprechend abziehen.
gebe ich den nächsten Wert ein in B3 z.B. 46 und drücke Enter steht in B2 der Wert 258
sollte das mit Enter nicht gehen wäre auch ein Button statt Enter denkbar.
Geht so etwas umzusetzen?
Viele Grüße
Michael

3
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Eingabe Wert - Nachbarzelle addieren und leeren
21.01.2020 08:18:20
SH95
Guten Morgen Michael,
folgenden Code fügst du im VBA in dem gewünschten Tabellenblatt ein:
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Target.Address = "$B$4" Then
With Sheets("Tabelle1")    'hier deinen Tabellennamen eingeben
.Range("B2") = .Range("B2") + .Range("B3")
.Range("B3").Select
End With
End If
End Sub
Falls dein Tabellenblatt nicht "Tabelle1" heißt, musst du das noch ändern.
Es ist allerdings so, wenn du die Zelle B4 von Hand betätigst, löst das Makro auch aus.
Falls du es mit einem Button lösen willst, dann fügst du folgenden Code im VBA in ein Modul ein und weißt dieses Makro deinem Button zu:
Private Sub addieren()
With Sheets("Tabelle1")   'Hier musst du deinen Tabellennamen eingeben
.Range("B2") = .Range("B2") + .Range("B3")
.Range("B3").Select
End With
End Sub
Gruß
Stefan
Anzeige
AW: Eingabe Wert - Nachbarzelle addieren und leeren
21.01.2020 08:31:58
Matthias
Hi
Code gehört ins entsprechende Tabellenblatt
Option Explicit
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Address = Range("B3").Address Then
Target.Offset(-1, 0) = Target.Offset(-1, 0) + Target
Application.EnableEvents = False
Target.ClearContents
Application.EnableEvents = True
End If
End Sub
Zellgültigkeit so einstellen das nur Zahlen erlaubt sind!
Sonst müsste noch eine Abfrage mehr in den Code.
Gruß Matthias
Gelöst und läuft wie gewünscht!
21.01.2020 15:47:25
Michael
Gelöst und läuft wie gewünscht!
Vielen Dank genau wie ich es brauch!

171 Forumthreads zu ähnlichen Themen

Zellen/Eingabe während Berechnung sperren
Koeffi

Hallo liebe Leute,
ich habe folgendes Problem.
In meinen Sheet werden nach der Auswahl mit einer Combo-Box eine Reihe Berechnungen (SVERWEISE) ausgeführt. Leider werden diese Unterbrechungen unterbrochen, wenn man mit der Maus klickt, oder auf der Tastatur eine Eingabe macht.
Ich wü...
20.08.2008 18:37:26
Thread-ID: 1003277
4 Beiträge
Anzeige
Zelle nach eingabe schützen
Andre

Hallo!!
Ich möchte gern, daß wenn ich in einer Zelle eine Eingabe tätige diese Zelle mit einem Passwort gegen Änderung gesichert wird.
Kann mir da jemand helfen?
Mit freundlichen Grüßen
Andre
05.02.2009 13:55:26
Thread-ID: 1047380
3 Beiträge
einzelne Zellen mit Formeln sperren
natka

Hallo Ihr Lieben Excel Begeisterte,
hättet Ihr bitte eine Tipp für mich, wie ich einzelne Zellen in einenm Tabellenblatt im Excel für Dritte sperren kann. Sie sollen zwar das Ergebnis seheh, aber nicht anklicken können. Damit meine tole Formel keinen Schaden nimmt.
Danke
natka
15.05.2009 14:20:56
Thread-ID: 1075486
4 Beiträge
Anzeige
Zellen vorübergehend zur Bearbeitung sperren
Corvi

Hallo Makro-Experten,
ich hoffe, dass Ihr mir irgendwie helfen könnt, da ich als Makro-Anfänger leider nicht weiß wie ich das Problem lösen soll.
Ich hab ein Excel-Arbeitsblatt, das zur Verwaltung eines kleinen Lagers genutzt wird. Jede Zeile in diesem Arbeitsblatt stellt einen Stellpla...
07.06.2009 13:12:33
Thread-ID: 1079699
7 Beiträge
Tastatureingabe für best. Zellen verhindern
Hermann

Hallo,
ich habe folg MAKRO (aus dem Archiv), welches die jeweilige Zelle in D bis F sperrt, sobald ein Eintrag erfolgt. Die Einträge erfolgen einzeln über die Schnittstelle COM 1; die Positionierung des Cursors erfolgt willkürlich mit der Maus (oder mit den Pfeiltasten, aber das ist bestimm...
16.06.2009 18:04:04
Thread-ID: 1082022
5 Beiträge
Bezug in Zelle X nach Eingabe in Zelle Y ändern
Jan

Liebe Excelianer,
ich programmiere gerade an einem Budgettool und möchte das folgende einbauen:
(Siehe auch Beispieltabelle) https://www.herber.de/bbs/user/63381.xls
Eine Tabelle besteht aus drei Spalten:
"Schätzung", "Aktuelle Kosten" und "Vertraglich fest" und zeigt, dass am...
23.07.2009 17:45:49
Thread-ID: 1090891
9 Beiträge
Zelle für Eingabe sperren ???
Roland

Hallo.
Als Excelanfänger kommt man immer sehr schnell an seine Grenzen. Ich habe folgendes Problemchen:
In einer Zelle - hier B21 - habe ich eine ja/nein - Abfrage angelegt.
Wenn mit ja geantwortet wird, soll der Nutzer in Zelle H21 ebenfall durch Auswahlmöglichkeit etwas eingeben....
13.09.2009 17:56:55
Thread-ID: 1102442
3 Beiträge
Zellen nach Eingabe sperren
Frank

Hallo Experten,
kann mir bei dem Code (er ist wohl aus diesem Forum) jemand helfen. Ich möchte die Ausführung auf die Tabellenblätter Januar-Dezember und die Bereiche (in jedem Blatt gleich) A1:I40 erweitern.
Der Code sperrt Zellen (Speicherung vorausgesetzt) , wenn sie Werte enthalten....
26.09.2009 21:50:00
Thread-ID: 1105774
7 Beiträge
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Jetzt das Excel-Portal bewerten: Deine Stimme zählt!

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige
Archiv - Verwandte Themen
Forumthread
Beiträge
3
12
2
3
9
6
4
8
2
6
1
4
7
2
13
8
4
2
3
3
2
8
4
6
1