Ich möchte nach clicken auf einem Togglebutton ein zweites pic.
ersichtlich machen.Erstes Picture bekommt man ja über Eigenschaften geladen.Bei Click soll nun aber anderes togglebutton.Picture sichtbar werden.Kann man mir da helfen.Danke Schippi
Option Explicit
Private Sub ToggleButton1_Click()
If ToggleButton1 Then
ToggleButton1.Picture = Image2.Picture
Else
ToggleButton1.Picture = Image1.Picture
End If
End Sub
Private Sub UserForm_Initialize()
ToggleButton1.Picture = Image1.Picture
End Sub
Vorbereitung der Bilder: Lade die beiden Bilder, die Du verwenden möchtest, in Deine Excel-Anwendung. Stelle sicher, dass sie im Entwurfsmodus als Image1
und Image2
benannt sind.
ToggleButton hinzufügen: Füge einen ToggleButton zu Deinem UserForm hinzu. Du findest diesen in der Toolbox, wenn Du den Entwurfsmodus aktivierst.
Code einfügen: Klicke mit der rechten Maustaste auf den ToggleButton und wähle "Code anzeigen". Füge den folgenden VBA-Code ein:
Option Explicit
Private Sub ToggleButton1_Click()
If ToggleButton1 Then
ToggleButton1.Picture = Image2.Picture
Else
ToggleButton1.Picture = Image1.Picture
End If
End Sub
Private Sub UserForm_Initialize()
ToggleButton1.Picture = Image1.Picture
End Sub
UserForm testen: Wechsle in den Formularansichtsmodus und klicke auf den ToggleButton, um zwischen den Bildern zu wechseln.
Bild wird nicht angezeigt: Stelle sicher, dass die Bilder korrekt im Entwurfsmodus geladen sind. Wenn Du die Bilder zur Laufzeit laden möchtest, kann es zu Fehlern kommen. Lade die Bilder besser vorab.
ToggleButton funktioniert nicht: Überprüfe, ob der ToggleButton im Entwurfsmodus aktiviert ist und dass der Code korrekt eingefügt wurde. Ein Syntaxfehler könnte den Code blockieren.
Falls Du keine ToggleButtons verwenden möchtest, kannst Du auch Schaltflächen (CommandButtons) verwenden, um Bilder anzuzeigen. Der Code würde ähnlich aussehen, jedoch mit dem Unterschied, dass Du die Schaltfläche klickst, um das Bild zu ändern.
Angenommen, Du möchtest ein Bild eines Smiley und ein Bild eines traurigen Gesichts zeigen. Lade beide Bilder als Image1
(Smiley) und Image2
(trauriges Gesicht). Der ToggleButton wechselt zwischen diesen Bildern, wenn Du ihn klickst.
Bilder optimieren: Stelle sicher, dass die Bilder eine angemessene Größe haben, um Ladezeiten zu minimieren. Zu große Bilder können die Performance Deines UserForms beeinträchtigen.
Animations-Effekte: Überlege, den Wechsel der Bilder mit einem sanften Übergang zu versehen, um die Benutzererfahrung zu verbessern.
1. Frage Kann ich mehr als zwei Bilder in einem ToggleButton verwenden?
Antwort: Standardmäßig kannst Du nur zwei Bilder verwenden, da der ToggleButton einen Zustand hat (ein/aus). Du könntest jedoch mehrere ToggleButtons kombinieren, um mehr Bilder darzustellen.
2. Frage Funktioniert dieser Code in allen Excel-Versionen?
Antwort: Ja, dieser Code sollte in den meisten modernen Excel-Versionen funktionieren, die VBA unterstützen. Achte darauf, dass Du in den Entwicklertools arbeitest.
Die erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden
Suche nach den besten AntwortenEntdecke unsere meistgeklickten Beiträge in der Google Suche
Top 100 Threads jetzt ansehen