ich möchte gerne animierte GIF-Dateien auf einer Userform darstellen und weiß
nicht wie, es sind z.B. zwei blinkende Lämpchen die je nach Wert in Textbox1
eingegeben wird auftauchen sollen.
Hätte da jemand ein Beispiel für mich?
Gruß
Ossi
'Funktioniert ab dem Internet-Explorer 4.0. Dazu muss die
'WebBrowser-ActiveX-Komponente in das Projekt eingebunden werden.
'Werkzeugsammlung links klichen, Zusätzliche Steuerelemente ...
'wählen und Microsoft Webbrowser markieren. Dieses Stuerelement
' 'WebBrowser1' verwenden.
Option Explicit
Const strImgPath As String = "C:\Temp\Pfeil.gif"
Private Sub UserForm_Initialize()
WebBrowser1.Navigate "about:<html><body scroll='no'>" & _
"<img src=" & strImgPath & "></img></bodyY></html>"
End Sub
Mit freundlichen Grüßen, GraFri
Um animierte GIF-Dateien in einer Userform darzustellen, benötigst du die WebBrowser-ActiveX-Komponente. Folge diesen Schritten:
Öffne dein Excel-Dokument und gehe zu Entwicklertools
.
Wähle Einfügen
und dann ActiveX-Steuerelemente
, um die Microsoft Webbrowser
-Komponente hinzuzufügen.
Ziehe das WebBrowser
-Steuerelement auf deine Userform.
Füge den folgenden VBA-Code in das Userform-Modul ein:
Option Explicit
Const strImgPath As String = "C:\Temp\dein_gif.gif" ' Pfad zur GIF-Datei
Private Sub UserForm_Initialize()
WebBrowser1.Navigate "about:<html><body scroll='no'><img src='" & strImgPath & "'></img></body></html>"
End Sub
Stelle sicher, dass du den korrekten Pfad zur GIF-Datei angibst.
Starte die Userform, um das animierte GIF anzuzeigen.
Fehler beim Kompilieren: Variable nicht definiert
WebBrowser
-Steuerelement richtig hinzugefügt wurde und den Namen WebBrowser1
trägt.Die Seite kann nicht angezeigt werden
Scrollbalken erscheint
scroll='no'
Parameter im HTML-Code zu setzen.Falls du die WebBrowser-Komponente nicht nutzen möchtest, gibt es alternative Methoden:
Hier ein Beispiel, wie du ein animiertes GIF mit einem animierten Pfeil in deiner Userform verwenden kannst:
animierten Pfeil
.C:\Temp
.1. Kann ich auch andere Formate verwenden?
Nein, die WebBrowser-Komponente unterstützt nur HTML und GIF-Formate. Für andere Animationen benötigst du spezielle Lösungen.
2. Warum sieht das GIF manchmal nicht animiert aus?
Dies kann an der Excel-Version oder den Einstellungen deines Systems liegen. Stelle sicher, dass die GIF-Datei korrekt und vollständig ist.
3. Wie kann ich die Größe des GIFs anpassen?
Du kannst die Größe des WebBrowser
-Steuerelements in der Userform anpassen, um das GIF in der gewünschten Größe darzustellen.
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