Live-Forum - Die aktuellen Beiträge
Datum
Titel
19.10.2025 21:57:06
Diagrammpunkte in unterschiedlichen Farben je nach Wert
19.10.2025 18:21:56
Prüfen, ob Bild geladen wurde
19.10.2025 15:24:14
VBA -Drucken nur, wenn ich mit bestimmtem WLAN verbunden bin
19.10.2025 10:48:58
Zufällige Uhrzeit
Keine passende Antwort im Forumarchiv gefunden?
Stelle deine Frage im Live-Forum
Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
680to684
680to684
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Zelle addieren bei bestimmter Taste

Forumthread: Zelle addieren bei bestimmter Taste

Zelle addieren bei bestimmter Taste
13.10.2005 08:34:49
Werner
Hallo!
Ich muss eine Statistik führen.
Ich möchte nun, das in der momentan aktiven Zelle bei betätigen einer Taste die Zahl darin um 1 erhöht wird. Also ähnlich wie bei einer Strichliste.
Beispiel:
In der Zelle A1 steht eine Zahl.
Durch drücken der Taste + wird diese Zahl um eins erhöht.
Das Gleiche soll auch in anderen Zellen der Arbeitsmappe funktionieren.
Wenn ich die Arbeitsmappe verlasse (um z. B. eine andere Exceldatei zu bearbeiten) muss die Plus-Taste wieder ihre ursprüngliche Funktion haben.
Geht sowas?
Für Hilfe wäre ich sehr dankbar.
Gruß
Werner
Anzeige

4
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Zelle addieren bei bestimmter Taste
13.10.2005 09:17:51
GeorgK
Hallo Werner,
vielleicht kannst Du damit etwas anfangen.
Funktioniert ab C5. Mußt Du halt anpassen.
Diesen Makro ins Tabellenblatt (Strg.+F11) kopieren

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Target.Column = 3 And Target.Row >= 5 Then
Range("C" & Target.Row).Value = Range("C" & Target.Row).Value + 1
End If
End Sub

Grüße
Georg
Anzeige
AW: Zelle addieren bei bestimmter Taste
13.10.2005 09:40:27
Werner
Vielen Dank!
Passt aber nicht so richtig zu meinem Problem.
Ich möchte eine bestimmte Taste haben, die in der Zelle, in der ich gerade bin (ändert sich ständig) die Zahl um 1 erhöht.
Werner
AW: Zelle addieren bei bestimmter Taste
13.10.2005 10:22:02
Galenzo
in das Modul "DieseArbeitsmappe":

Private Sub Workbook_Open()
Application.OnKey "{+}", "Increment"
End Sub

in ein Modul:
Sub increment()
On Error Resume Next
ActiveCell = ActiveCell + 1
End Sub
Viel Erfolg!
Anzeige
AW: Zelle addieren bei bestimmter Taste
13.10.2005 10:31:19
Werner
Genau so!!!
Super! Vielen Dank Galenzo!!!
Bis dann
Werner
;

Beliebteste Forumthreads (12 Monate)

Jetzt das Excel-Portal bewerten: Deine Stimme zählt!
Anzeige
Anzeige
Entdecke mehr
Finde genau, was du suchst

Die erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden

Suche nach den besten Antworten
Unsere beliebtesten Threads

Entdecke unsere meistgeklickten Beiträge in der Google Suche

Top 100 Threads jetzt ansehen
Anzeige