Microsoft Excel

Herbers Excel/VBA-Archiv

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

ActiveX-Steuerelement - farbig

Betrifft: ActiveX-Steuerelement - farbig von: Rauscher
Geschrieben am: 14.10.2020 21:05:48

Hallo,

ich möchte in einem Arbeitsblatt ein ActiveX-Steuerelement (Button) erstellen, wo der Button beim betätigen auf die Farbe grün springt.


Das Steuerelement habe ich erstellt nur weis ich den Code nicht dazu um dieses Ereignis zu erzeugen


Ich bin um jede Antwort dankbar.


Gruß Ludwig

Betrifft: AW: ActiveX-Steuerelement - farbig
von: onur
Geschrieben am: 14.10.2020 21:22:28

Du musst nicht ein Ereignis erzeugen, sondern auf das Klick-Ereignis reagieren.
z.B. so:
Private Sub CommandButton1_Click()
    If CommandButton1.BackColor = RGB(255, 100, 100) Then 'ROT
        CommandButton1.BackColor = RGB(100, 255, 100) 'GRÜN
    Else
        CommandButton1.BackColor = RGB(255, 100, 100) 'ROT
    End If
End Sub


Betrifft: AW: ActiveX-Steuerelement - farbig
von: Rauscher
Geschrieben am: 14.10.2020 21:42:14

Hallo,

danke für die schnelle Antwort.

gruß Ludwig

Betrifft: Gerne !
von: onur
Geschrieben am: 14.10.2020 21:44:29