Gif dans user form

[badbad]

Bonsoir,
Je cherche a mettre un gif anime dans un userform.
Je sais que ce sujet a été traité de nombreuses fois et j ai lu toutes les réponses avec avidité.
Donc tout d abord un grand merci a Thierry pour sont fichier Matrix et un autre grand merci a Veriland pour son fichier Gif_Anime.

Malheureusement je realise de plus en plus du fait que je ne suis pas très très malin et je n'y arrive pas...
.
En fichier Zip le test de mon userform .
Chez moi le résultat de celui-ci est l affichage d un Navigator web blanc ( et ben il est passe ou le gif anime.... ).

Si vous pouviez jeter un petit coup d oeil et me dire en deux coups de cuillères a pots la ou je merde lamentablement ce serrait gentil....

Merci par avance cordialement
BESSY Alexandre

PS : désolé pour les accents qui manquent mais je travail sur un poste qwerty…
[file name=Tests_UserForm3.zip size=7809]http://www.excel-downloads.com/components/com_simpleboard/uploaded/files/Tests_UserForm3.zip[/file]

 

[MichelXld]

bonjour Alexandre

il y a un petit soucis dans le nom du WebBrowser

dans ta macro tu as écris

webbroser1.Navigate gif

au lieu de

WebBrowser1.Navigate gif



sinon pour que le gif s'affiche dès l'ouverture de l'UserForm remplace l'evenement

Private Sub UserForm_Click()

par

Private Sub UserForm_Initialize()



en définitif pour ton projet , remplace

Private Sub UserForm_Click()
Dim gif As Variant
gif = 'C:\\Documents and Settings\\BESSY Alexandre\\Mes documents\\F1Time.com\\Photo_Tracks.gif'
webbroser1.Navigate gif
End Sub

par

Private Sub UserForm_Initialize()
Dim Gif As String
Gif = 'C:\\Documents and Settings\\BESSY Alexandre\\Mes documents\\F1Time.com\\Photo_Tracks.gif'
WebBrowser1.Navigate Gif
End Sub

bonne journée
MichelXld

 

[badbad]

Merci je vais essayer tout ça.

AB

 

[badbad]

Bonjour,
Je viens d essayer mais j ai toujours une fenetre vide...

Ci-joint mon fichier... :unsure: [file name=PB_userform.zip size=24247]http://www.excel-downloads.com/components/com_simpleboard/uploaded/files/PB_userform.zip[/file]

 

[MichelXld]

rebonjour Alexandre

tu as écris

UserForm_Initialise

au lieu de

UserForm_Initialize


bonne soiree
MichelXld [file name=PB_userformV02.zip size=26609]http://www.excel-downloads.com/components/com_simpleboard/uploaded/files/PB_userformV02.zip[/file]

 

[badbad]

Effectivement ça marche beaucoup mieux...

Aller, dodo maintenant... j'en ai apparament besoin...

Merci beaucoup…
BESSY Alexandre

 

[Franck]

Et si le gif se trouve sur le réseau, comment faire, j'ai inscrit comme chemin gif = '\\\\serveur2\\........' mais cela n'a pas fonctionné !

 

[Franck]

Je veux dire gif = '\\\\serveur2\\......'

 

[MichelXld]

bonsoir

as tu essayé une synthaxe de ce style ( en adaptant le nom du serveur bien entendu)

Dim Img As String
Img = '\\\\nomServeur\\repertoire\\monImage.gif'
WebBrowser1.Navigate Img

bon week end
MichelXld