Herbers Excel/VBA-Archiv

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

Informationen und Beispiele zum Thema ToggleButton
Screenshot zu ToggleButton	ToggleButton-Seite mit Beispielarbeitsmappe aufrufen

Toggle Butto mit Bilder

• Toggle Butto mit Bilder von Vulferin vom 26.08.2014 20:56:13
• AW: Toggle Butto mit Bilder - von ransi am 26.08.2014 22:30:32
• AW: Toggle Butto mit Bilder - von Beverly am 26.08.2014 23:12:59

Betrifft: Toggle Butto mit Bilder von: Vulferin
Geschrieben am: 26.08.2014 20:56:13

Hallo zusammen
Ich kann ja einen Togglebutton ein Bild zuordnen.
geht dies je nach Stellung des Button ?

Betrifft: AW: Toggle Butto mit Bilder von: ransi
Geschrieben am: 26.08.2014 22:30:32

Hallo

ICh würds so machen:
https://www.herber.de/bbs/user/92310.xlsm

Die beiden CommandButtons dienen nur als Container um die Bilder aufzunehmen.
Darum hab ich sie ausgeblendet.

ransi

Betrifft: AW: Toggle Butto mit Bilder von: Beverly
Geschrieben am: 26.08.2014 23:12:59

Hi,

lege die 2 Bilder im Tabellenblatt übereinander und darauf den ToggleButton. Für diesen stellst du die Eigenschaft BackStyle auf tranparent. Mit folgendem Code wird dann entweder das eine oder das andere Bild eingeblendet:

Private Sub ToggleButton1_Click()
   If ToggleButton1 Then
      ActiveSheet.Shapes("Picture 8").Visible = True
      ActiveSheet.Shapes("Picture 7").Visible = False
      Selection.Select
   Else
      ActiveSheet.Shapes("Picture 7").Visible = True
      ActiveSheet.Shapes("Picture 8").Visible = False
      Selection.Select
   End If
End Sub

Bildnamen anpassen.

---

Beiträge aus den Excel-Beispielen zum Thema "Toggle Butto mit Bilder"