Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Inhaltsverzeichnis

Schieberegister auf z.B. Knopfdruck

Forumthread: Schieberegister auf z.B. Knopfdruck

Schieberegister auf z.B. Knopfdruck
18.02.2004 10:07:14
Thomas Maier
Ich habe einen Eingang der auf 1 oder 0 gesetzt wird.
Immer wenn er auf 1 gesetzt wird soll mein Ausgabewert um +1 erhöht werden.
Bei Wert 0 soll er gleich bleiben.
Anzeige

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

Betreff
Datum
Anwender
Anzeige
AW: Schieberegister auf z.B. Knopfdruck
18.02.2004 10:15:57
Harry
Hallo Thomas,
versuchs mal damit
Drück Alt+F11, für ein neues Modul ein und gib dort folgenden Code ein:

Sub test()
Dim wert_alt As Integer
Dim wert_neu As Integer
wert_alt = Range("a1").Value
wert_neu = wert_alt + 1
Range("a1").Value = wert_neu
End Sub

Danach ordnest Du einer Schaltfläche den Makro "test" zu
danach erhöht sich der Wert in Zelle A1 bei jedem Drücken um 1

Gruss
Harry
Anzeige
Einfacher?
18.02.2004 10:41:19
Jörg Gradert
Hallo Harry,
ich bin relativ neu in VBA, aber was spricht denn gegen

Sub test2()
Range("A1") = Range("A1") + 1
End Sub

?
Gruss Jörg
;

Beliebteste Forumthreads (12 Monate)

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