Microsoft Excel

Herbers Excel/VBA-Archiv

Informationen und Beispiele zum Thema CommandButton
BildScreenshot zu CommandButton CommandButton-Seite mit Beispielarbeitsmappe aufrufen

Hochzählen durch Commandbutton?? | Herbers Excel-Forum


Betrifft: Hochzählen durch Commandbutton?? von: Dirk
Geschrieben am: 27.10.2008 13:34:54

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

  

Betrifft: AW: Hochzählen durch Commandbutton?? von: JogyB
Geschrieben am: 27.10.2008 13:39:53

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


  

Betrifft: AW: Hochzählen durch Commandbutton?? von: Dirk
Geschrieben am: 27.10.2008 13:46:41

Perfekt, tausend Dank!

Gruß
Dirk


Beiträge aus den Excel-Beispielen zum Thema "Hochzählen durch Commandbutton??"