Live-Forum - Die aktuellen Beiträge
Datum
Titel
25.04.2024 23:47:55
Datum ausweisen, wenn definierte Summe erreicht ist
25.04.2024 21:40:53
Excel Datenquelle aus dem Web mit Anmeldung?
25.04.2024 21:21:16
Zellkommentar in UserForm anzeigen und bearbeiten
25.04.2024 21:13:13
Kalenderwochen addieren
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
1016to1020
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
1016to1020
1016to1020
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Hochzählen durch Commandbutton??

Hochzählen durch Commandbutton?
27.10.2008 13:34:00
Dirk
Hallo Leute, ich möchte an einen Commandbutton eine Funktion anhängen. Beim anklicken des Buttons soll die Zahl in einer Zelle z.B A1 um einen erhöht werden, bzw wenn die Zelle noch leer ist soll nach dem Klicken eine 1 dort stehen. Beim weiteren Klicken eine 2 u.s.w. Geht das?
Danke und Gruß
Dirk

2
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Hochzählen durch Commandbutton?
27.10.2008 13:39:53
JogyB
Dem CommandButton dieses Makro zuweisen

Sub einsRauf()
If IsNumeric(Range("A1")) Then
Range("A1") = Range("A1").Value + 1
ElseIf Range("A1") = "" Then
Range("A1") = 1
End If
End Sub


Achtung: In der Form überschreibt das Makro vorhandene Formeln.
Gruss, Jogy

AW: Hochzählen durch Commandbutton?
27.10.2008 13:46:00
Dirk
Perfekt, tausend Dank!
Gruß
Dirk
Anzeige

8 Forumthreads zu ähnlichen Themen

Wert in Zelle um 1 erhöhen
Daniel

Hallo,
kann mir jemand sagen wie der VBA Code aussehen muss für folgendes Problem?!
Also ich habe in Zelle sagen wir B200 einen Wert von 100. Nun möchte ich das per Makro bei Zelle B201 mit dem Wert 1 angefangen wird und in den darunterliegenden Zellen jeweils um 1 erhöht wird, also 1,2...
26.10.2009 12:35:35
Thread-ID: 1112187
12 Beiträge
Anzeige
Wert in Zelle nach löschen um 1 erhöhen
mike49

Hallo zusammen,
Ich habe dieses Löschen Makro: Sub Löschen() ' Löschen Makro ActiveSheet.Unprotect Application.ScreenUpdating = False 'Bildschirmaktualisierung abschalten. 'Übernahme der Monatsstundentunden/Urlaubs-/Krankheitstage Dim zeile As Integer 'Monatsstunden zeile = 22 + ActiveSheet...
15.05.2018 15:47:42
Thread-ID: 1624151
4 Beiträge
Wert in Zelle A1 um 1 erhöhen bis
gaston

Hallo,
ich möchte eine Berechnung in Zelle C3 iterativ ablaufen lassen, Dazu wird der Wert in Zelle A1 (beginnend bei 0) um 1 erhöht. Wenn die Formel in Zelle C3 den Wert 1 aufweist, soll die Prozedur beendet werden. Falls nicht, soll der Wert in Zelle A1 um 1 erhöht werden, neu berechnet w...
30.12.2019 15:21:36
Thread-ID: 1731275
2 Beiträge
Anzeige
Bei Klick auf Schaltfläche eine Zelle um 1 erhöhen aber alle 100 auslassen
Jeanson

Hallo,
ich brauche eine Art Zahlengenerator, dafür habe ich schon einen ganz einfachen makro:
Sub Schaltfläche1_BeiKlick() Range("A5").Select Nummer = ActiveCell.Value Nummer = Nummer + 1 ActiveCell.Formula = Nummer End Sub
und einmal
Sub Schaltfläche1_BeiKlick() Range("A5").S...
13.02.2020 21:22:43
Thread-ID: 1740327
5 Beiträge
Bei Klick auf Schaltfläche eine Zelle um 1 erhöhen aber alle 100 auslassen
Jeanson

Hallo,
ich brauche eine Art Zahlengenerator, dafür habe ich schon einen ganz einfachen makro:
Sub Schaltfläche1_BeiKlick() Range("A5").Select Nummer = ActiveCell.Value Nummer = Nummer + 1 ActiveCell.Formula = Nummer End Sub
und einmal
Sub Schaltfläche1_BeiKlick() Range("A5").S...
13.02.2020 22:30:07
Thread-ID: 1740332
12 Beiträge
Zelle Wert um 1 erhöhen?
Stefan

Hallo Profis
Erstmal wünsche ich euch ein schönes Wochenende.
Habe mal eine Frage.
Ich bin dabei eine Tabelle, uns zwar die Werte die dort drinnen stehen, alle um 1 zu erhöhen, da diese zuvor falsch eingegeben wurden.
Jetzt muss ich alle Zellen manuell umschreiben und zwar ca....
18.04.2021 14:23:25
Thread-ID: 1826454
4 Beiträge
Anzeige

Links zu Excel-Dialogen

CommandButton

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
11
2
3
1
4
4
11
3