Toggle Button

Forumthread: Toggle Button

Toggle Button

29.12.2007 18:35:00

klaro

Hallo Leute!
Ein Problem!
Dieser ToggleButton arbeitet gut
Jedoch ist ein eindeutiger zustand nicht
Erkennbar trotz Schrift und Farbe!!
Ich benutze ausfuehren=True als Trigger
Also
If ausfuehren =True Then..
Eimal liegt es unter STOP aber andersmal
UnterSTART
Wer kann helfen?


Private Sub ToggleButton1_Click()
ausfuehren = Not ausfuehren
If ToggleButton1.Value = True Then
ToggleButton1.Caption = "STOP"
ToggleButton1.ForeColor = 14
ToggleButton1.BackColor = RGB(255, 255, 0)
Else
ToggleButton1.Caption = "START"
ToggleButton1.ForeColor = 70
ToggleButton1.BackColor = RGB(0, 255, 255)
End If
End Sub

Grüße
klaro

4
Beiträge zum Forumthread

Beiträge zu diesem Forumthread

Betreff

Datum

Anwender

AW: Toggle Button

29.12.2007 18:39:03

mumpel
AW: Toggle Button

29.12.2007 19:23:25

klaro
AW: Toggle Button

29.12.2007 19:30:10

Beverly
AW: Toggle Button

29.12.2007 19:54:26

klaro

AW: Toggle Button

29.12.2007 18:39:03

mumpel

Hallo!
Das liegt daran, dass der Zustand des ToggleButton beim Schließen der Arbeitsmappe nicht gespeichert wird. Du musst also den Zustand in einer Zelle speichern und diesen beim Öffnen der Arbeitsmappe abfragen Workbook_Open) und entsprechend das Togglebutton schalten.
Gruß, Rene

AW: Toggle Button

29.12.2007 19:23:25

klaro

Hallo Rene!
es leuchtet mir ein jedoch bin ich nicht soweit
könntest DU mir ein Beispiel machen?
klaro

AW: Toggle Button

29.12.2007 19:30:10

Beverly

Hi,
der ToggleButton hat eine LinkedCell als Eigenschaft, in die je nach Zustand dann automatisch WAHR oder FALSCH geschrieben wird. Diese Zelle musst du entsprechend auslesen.
________________________________________

AW: Toggle Button

29.12.2007 19:54:26

klaro

Hallo Beverly!
Hoffe das es klappt!
Danke sehr.
Allen ein guten Rutsch!
klaro

Infobox / Tutorial

Toggle Button in Excel VBA effektiv nutzen

Schritt-für-Schritt-Anleitung
Häufige Fehler und Lösungen
Alternative Methoden
Praktische Beispiele
Tipps für Profis
FAQ: Häufige Fragen

Schritt-für-Schritt-Anleitung

Einfügen eines Toggle Buttons:
- Öffne Excel und gehe zu Entwicklertools.
- Wähle Einfügen und dann den ToggleButton aus der Formularsteuerelemente-Liste.
- Ziehe den Toggle Button auf das Arbeitsblatt.

VBA-Code hinzufügen:

Klicke mit der rechten Maustaste auf den Toggle Button und wähle Code anzeigen.
Füge den folgenden Code in das VBA-Fenster ein:

Private Sub ToggleButton1_Click()
   ausfuehren = Not ausfuehren
   If ToggleButton1.Value = True Then
       ToggleButton1.Caption = "STOP"
       ToggleButton1.ForeColor = 14
       ToggleButton1.BackColor = RGB(255, 255, 0)
   Else
       ToggleButton1.Caption = "START"
       ToggleButton1.ForeColor = 70
       ToggleButton1.BackColor = RGB(0, 255, 255)
   End If
End Sub

Zustand speichern:
- Füge im Workbook_Open-Ereignis den Code hinzu, um den Zustand des Toggle Buttons beim Öffnen der Arbeitsmappe abzufragen und zu setzen.
```
Private Sub Workbook_Open()
   ToggleButton1.Value = Range("A1").Value
   Call ToggleButton1_Click
End Sub
```
Zustand in einer Zelle speichern:
- Im ToggleButton_Click-Ereignis, speichere den Zustand in einer Zelle:
```
Range("A1").Value = ToggleButton1.Value
```

Häufige Fehler und Lösungen

Problem: Der Zustand des Toggle Buttons wird nicht gespeichert.
- Lösung: Stelle sicher, dass du den Zustand in einer Zelle speicherst und beim Öffnen der Datei abfragst.
Problem: Toggle Button zeigt nicht den richtigen Zustand an.
- Lösung: Überprüfe, ob der Code im Workbook_Open-Ereignis richtig gesetzt ist und ob die Zelle den korrekten Wert speichert.

Alternative Methoden

Benutzung einer LinkedCell: Du kannst dem Toggle Button eine LinkedCell zuweisen. So wird der Zustand automatisch in der angegebenen Zelle (z. B. A1) gespeichert, ohne dass du zusätzlichen VBA-Code schreiben musst.
Verwendung von Formeln: Anstelle eines Toggle Buttons kannst du auch eine WENN-Formel verwenden, um eine ähnliche Funktionalität zu erreichen.

Praktische Beispiele

Beispiel 1: Ein Benutzerformular mit einem Toggle Button, das den Zustand eines Prozesses steuert:
- Füge einen Toggle Button in ein UserForm ein und verwende den gleichen Code wie oben, um den Zustand zu ändern und anzuzeigen.
Beispiel 2: Verwendung des Toggle Buttons für die Anzeige und Ausblendung von Informationen in einer Tabelle. Setze den Button so, dass beim Klicken bestimmte Zeilen ein- oder ausgeblendet werden.

Tipps für Profis

Verwendung von ToggleButton in UserForms: Wenn du mit Excel VBA UserForms arbeitest, kannst du die gleiche Logik anwenden. Achte darauf, dass du die Benutzeroberfläche ansprechend gestaltest.
VBA-Bibliotheken: Nutze VBA-Bibliotheken, um erweiterte Funktionen für deinen Toggle Button zu integrieren, wie z.B. Animationen oder Übergänge.

FAQ: Häufige Fragen

1. Wie kann ich den Zustand eines Toggle Buttons abfragen? Um den Zustand eines Toggle Buttons abzufragen, kannst du einfach die Value-Eigenschaft des Buttons verwenden:

If ToggleButton1.Value = True Then
    ' Code für den aktiven Zustand
End If

2. Was mache ich, wenn der Toggle Button nicht funktioniert? Überprüfe, ob der VBA-Code korrekt eingegeben wurde und ob die Arbeitsmappe gespeichert ist, bevor du sie schließt. Achte auch darauf, dass keine Schreibschutz- oder Berechtigungsprobleme vorliegen.

Beliebteste Forumthreads (12 Monate)

Forumthread: Toggle Button

4 Beiträge zum Forumthread Beiträge zu diesem Forumthread

Forumthreads zu verwandten Themen

VBA Beispiele zu diesem und ähnlichen Themen

Infobox / Tutorial

Toggle Button in Excel VBA effektiv nutzen

Schritt-für-Schritt-Anleitung

Häufige Fehler und Lösungen

Alternative Methoden

Praktische Beispiele

Tipps für Profis

FAQ: Häufige Fragen

Beliebteste Forumthreads (12 Monate)

4
Beiträge zum Forumthread

Beiträge zu diesem Forumthread