Twitter iPhone pliant OnePlus 11 PS5 Disney+ Orange Livebox Windows 11

lecture de gif dans excel et VBA ?

8 réponses
Avatar
Warphil
Bonjour,
voici mon problème, je suis sous excel2007 et j'ai un userform que je veux
agrémenter d'un gif animé, après plusieurs recherche sur le net je trouve la
façon d'ajouter le "microsoft web browser" dans la boite de contrôle,
j'ajoute le code suivant dans l'userform

Private Sub UserForm_initialize()
WebBrowser1.Navigate _
"about:<html><body scroll='no'>" & _
"<img src='L:\2009\gif\acceuil018.gif'></img></body></html>"
End Sub

Mais tout ce que j'arrive à voire c'est une croix rouge dans un rectangle
blanc, j'ai essayé sur un autre PC sous excel2003, j'ai essayé de déplacer
le fichier de stockage de mes GIFs dans le même dossier que mon classeur
excel, j'ai essayé de changer de GIF, j'ai essayé de mettre le GIF
directement sur la feuille excel, mais toujours pareil une croix rouge dans
un rectangle blanc, y at'il autre chose à faire pour que mon GIF soit lu ?

Merci d'avance à tous ceux qui ce pencheront sur mon problème.

8 réponses

Avatar
isabelle
bonjour Warphil,

Private Sub UserForm_Initialize()
WebBrowser1.Navigate _
"about:<html><body scroll='no'>" & _
"<img src='L:2009gifacceuil018.gif'></img></body></html>"
DoEvents
End Sub

isabelle

Warphil a écrit :
Bonjour,
voici mon problème, je suis sous excel2007 et j'ai un userform que je
veux agrémenter d'un gif animé, après plusieurs recherche sur le net
je trouve la façon d'ajouter le "microsoft web browser" dans la boite
de contrôle, j'ajoute le code suivant dans l'userform

Private Sub UserForm_initialize()
WebBrowser1.Navigate _
"about:<html><body scroll='no'>" & _
"<img src='L:2009gifacceuil018.gif'></img></body></html>"
End Sub

Mais tout ce que j'arrive à voire c'est une croix rouge dans un
rectangle blanc, j'ai essayé sur un autre PC sous excel2003, j'ai
essayé de déplacer le fichier de stockage de mes GIFs dans le même
dossier que mon classeur excel, j'ai essayé de changer de GIF, j'ai
essayé de mettre le GIF directement sur la feuille excel, mais
toujours pareil une croix rouge dans un rectangle blanc, y at'il autre
chose à faire pour que mon GIF soit lu ?

Merci d'avance à tous ceux qui ce pencheront sur mon problème.


Avatar
Warphil
Bonjour isabelle,
Merci de consacrer un peu de ton temps à mes soucis.
J'ai essayé en ajoutant "DoEvents" mais j'ai toujours le même problème, si
tu as une autre idée, je suis preneur

"isabelle" a écrit dans le message de
news:
bonjour Warphil,

Private Sub UserForm_Initialize()
WebBrowser1.Navigate _
"about:<html><body scroll='no'>" & _
"<img src='L:2009gifacceuil018.gif'></img></body></html>"
DoEvents
End Sub

isabelle

Warphil a écrit :
Bonjour,
voici mon problème, je suis sous excel2007 et j'ai un userform que je
veux agrémenter d'un gif animé, après plusieurs recherche sur le net je
trouve la façon d'ajouter le "microsoft web browser" dans la boite de
contrôle, j'ajoute le code suivant dans l'userform

Private Sub UserForm_initialize()
WebBrowser1.Navigate _
"about:<html><body scroll='no'>" & _
"<img src='L:2009gifacceuil018.gif'></img></body></html>"
End Sub

Mais tout ce que j'arrive à voire c'est une croix rouge dans un rectangle
blanc, j'ai essayé sur un autre PC sous excel2003, j'ai essayé de
déplacer le fichier de stockage de mes GIFs dans le même dossier que mon
classeur excel, j'ai essayé de changer de GIF, j'ai essayé de mettre le
GIF directement sur la feuille excel, mais toujours pareil une croix
rouge dans un rectangle blanc, y at'il autre chose à faire pour que mon
GIF soit lu ?

Merci d'avance à tous ceux qui ce pencheront sur mon problème.




Avatar
Corto
Bonjour Warphil,
Pourquoi n'utilise tu pas un controle Image ?

Corto

Warphil a écrit :
Bonjour,
voici mon problème, je suis sous excel2007 et j'ai un userform que je
veux agrémenter d'un gif animé, après plusieurs recherche sur le net
je trouve la façon d'ajouter le "microsoft web browser" dans la boit e
de contrôle, j'ajoute le code suivant dans l'userform

Private Sub UserForm_initialize()
WebBrowser1.Navigate _
"about:<html><body scroll='no'>" & _
"<img src='L:2009gifacceuil018.gif'></img></body></html>"
End Sub

Mais tout ce que j'arrive à voire c'est une croix rouge dans un
rectangle blanc, j'ai essayé sur un autre PC sous excel2003, j'ai
essayé de déplacer le fichier de stockage de mes GIFs dans le mêm e
dossier que mon classeur excel, j'ai essayé de changer de GIF, j'ai
essayé de mettre le GIF directement sur la feuille excel, mais
toujours pareil une croix rouge dans un rectangle blanc, y at'il autre
chose à faire pour que mon GIF soit lu ?

Merci d'avance à tous ceux qui ce pencheront sur mon problème.


Avatar
isabelle
bonjour Warphil,

est tu certain pour le chemin d'accès et pour le gif ?
tu pourrais faire un autre test en t'envoyant un courriel avec ce gif,

isabelle

Warphil a écrit :
Bonjour isabelle,
Merci de consacrer un peu de ton temps à mes soucis.
J'ai essayé en ajoutant "DoEvents" mais j'ai toujours le même
problème, si tu as une autre idée, je suis preneur

"isabelle" a écrit dans le message de
news:
bonjour Warphil,

Private Sub UserForm_Initialize()
WebBrowser1.Navigate _
"about:<html><body scroll='no'>" & _
"<img src='L:2009gifacceuil018.gif'></img></body></html>"
DoEvents
End Sub

isabelle

Warphil a écrit :
Bonjour,
voici mon problème, je suis sous excel2007 et j'ai un userform que
je veux agrémenter d'un gif animé, après plusieurs recherche sur le
net je trouve la façon d'ajouter le "microsoft web browser" dans la
boite de contrôle, j'ajoute le code suivant dans l'userform

Private Sub UserForm_initialize()
WebBrowser1.Navigate _
"about:<html><body scroll='no'>" & _
"<img src='L:2009gifacceuil018.gif'></img></body></html>"
End Sub

Mais tout ce que j'arrive à voire c'est une croix rouge dans un
rectangle blanc, j'ai essayé sur un autre PC sous excel2003, j'ai
essayé de déplacer le fichier de stockage de mes GIFs dans le même
dossier que mon classeur excel, j'ai essayé de changer de GIF, j'ai
essayé de mettre le GIF directement sur la feuille excel, mais
toujours pareil une croix rouge dans un rectangle blanc, y at'il
autre chose à faire pour que mon GIF soit lu ?

Merci d'avance à tous ceux qui ce pencheront sur mon problème.







Avatar
Warphil
j'ai fait le test en m'envoyant un courriel et mon gif s'anime

warphil

"isabelle" a écrit dans le message de
news:
bonjour Warphil,

est tu certain pour le chemin d'accès et pour le gif ?
tu pourrais faire un autre test en t'envoyant un courriel avec ce gif,

isabelle

Warphil a écrit :
Bonjour isabelle,
Merci de consacrer un peu de ton temps à mes soucis.
J'ai essayé en ajoutant "DoEvents" mais j'ai toujours le même problème,
si tu as une autre idée, je suis preneur

"isabelle" a écrit dans le message de
news:
bonjour Warphil,

Private Sub UserForm_Initialize()
WebBrowser1.Navigate _
"about:<html><body scroll='no'>" & _
"<img src='L:2009gifacceuil018.gif'></img></body></html>"
DoEvents
End Sub

isabelle

Warphil a écrit :
Bonjour,
voici mon problème, je suis sous excel2007 et j'ai un userform que je
veux agrémenter d'un gif animé, après plusieurs recherche sur le net je
trouve la façon d'ajouter le "microsoft web browser" dans la boite de
contrôle, j'ajoute le code suivant dans l'userform

Private Sub UserForm_initialize()
WebBrowser1.Navigate _
"about:<html><body scroll='no'>" & _
"<img src='L:2009gifacceuil018.gif'></img></body></html>"
End Sub

Mais tout ce que j'arrive à voire c'est une croix rouge dans un
rectangle blanc, j'ai essayé sur un autre PC sous excel2003, j'ai
essayé de déplacer le fichier de stockage de mes GIFs dans le même
dossier que mon classeur excel, j'ai essayé de changer de GIF, j'ai
essayé de mettre le GIF directement sur la feuille excel, mais toujours
pareil une croix rouge dans un rectangle blanc, y at'il autre chose à
faire pour que mon GIF soit lu ?

Merci d'avance à tous ceux qui ce pencheront sur mon problème.









Avatar
Warphil
Bonjour Corto,

Si j'utilise le "controle image" je vois bien mon Gif sur l'userform, mais
il n'est pas animé

warphil

"Corto" a écrit dans le message de
news:Ozxcv%
Bonjour Warphil,
Pourquoi n'utilise tu pas un controle Image ?

Corto

Warphil a écrit :
Bonjour,
voici mon problème, je suis sous excel2007 et j'ai un userform que je veux
agrémenter d'un gif animé, après plusieurs recherche sur le net je trouve
la façon d'ajouter le "microsoft web browser" dans la boite de contrôle,
j'ajoute le code suivant dans l'userform

Private Sub UserForm_initialize()
WebBrowser1.Navigate _
"about:<html><body scroll='no'>" & _
"<img src='L:2009gifacceuil018.gif'></img></body></html>"
End Sub

Mais tout ce que j'arrive à voire c'est une croix rouge dans un rectangle
blanc, j'ai essayé sur un autre PC sous excel2003, j'ai essayé de déplacer
le fichier de stockage de mes GIFs dans le même dossier que mon classeur
excel, j'ai essayé de changer de GIF, j'ai essayé de mettre le GIF
directement sur la feuille excel, mais toujours pareil une croix rouge
dans un rectangle blanc, y at'il autre chose à faire pour que mon GIF soit
lu ?

Merci d'avance à tous ceux qui ce pencheront sur mon problème.


Avatar
Warphil
Je réponds à moi même, je n'ai pas trouvé la solution, mais çà doit être un
problème sur le chemin du fichier puisque lorsque j'indique une adresse URL
ça fonctionne.
Si quelqu'un comprend d'ou vient le problème, je serai heureux qu'il
m'esplique.

warphil

"Warphil" a écrit dans le message de
news:
Bonjour,
voici mon problème, je suis sous excel2007 et j'ai un userform que je veux
agrémenter d'un gif animé, après plusieurs recherche sur le net je trouve
la façon d'ajouter le "microsoft web browser" dans la boite de contrôle,
j'ajoute le code suivant dans l'userform

Private Sub UserForm_initialize()
WebBrowser1.Navigate _
"about:<html><body scroll='no'>" & _
"<img src='L:2009gifacceuil018.gif'></img></body></html>"
End Sub

Mais tout ce que j'arrive à voire c'est une croix rouge dans un rectangle
blanc, j'ai essayé sur un autre PC sous excel2003, j'ai essayé de déplacer
le fichier de stockage de mes GIFs dans le même dossier que mon classeur
excel, j'ai essayé de changer de GIF, j'ai essayé de mettre le GIF
directement sur la feuille excel, mais toujours pareil une croix rouge
dans un rectangle blanc, y at'il autre chose à faire pour que mon GIF soit
lu ?

Merci d'avance à tous ceux qui ce pencheront sur mon problème.


Avatar
isabelle
bonjour Warphil,

peut tu faire un essai en placant ton gif dans un répertoire temporaire,
dans c:temps par exemple,

Private Sub UserForm_Initialize()
WebBrowser1.Navigate _
"about:<html><body scroll='no'>" & _
"<img src='c:tempsacceuil018.gif'></img></body></html>"
DoEvents
End Sub

isabelle

Warphil a écrit :
j'ai fait le test en m'envoyant un courriel et mon gif s'anime

warphil

"isabelle" a écrit dans le message de
news:
bonjour Warphil,

est tu certain pour le chemin d'accès et pour le gif ?
tu pourrais faire un autre test en t'envoyant un courriel avec ce gif,

isabelle

Warphil a écrit :
Bonjour isabelle,
Merci de consacrer un peu de ton temps à mes soucis.
J'ai essayé en ajoutant "DoEvents" mais j'ai toujours le même
problème, si tu as une autre idée, je suis preneur

"isabelle" a écrit dans le message de
news:
bonjour Warphil,

Private Sub UserForm_Initialize()
WebBrowser1.Navigate _
"about:<html><body scroll='no'>" & _
"<img src='L:2009gifacceuil018.gif'></img></body></html>"
DoEvents
End Sub

isabelle

Warphil a écrit :
Bonjour,
voici mon problème, je suis sous excel2007 et j'ai un userform que
je veux agrémenter d'un gif animé, après plusieurs recherche sur
le net je trouve la façon d'ajouter le "microsoft web browser"
dans la boite de contrôle, j'ajoute le code suivant dans l'userform

Private Sub UserForm_initialize()
WebBrowser1.Navigate _
"about:<html><body scroll='no'>" & _
"<img src='L:2009gifacceuil018.gif'></img></body></html>"
End Sub

Mais tout ce que j'arrive à voire c'est une croix rouge dans un
rectangle blanc, j'ai essayé sur un autre PC sous excel2003, j'ai
essayé de déplacer le fichier de stockage de mes GIFs dans le même
dossier que mon classeur excel, j'ai essayé de changer de GIF,
j'ai essayé de mettre le GIF directement sur la feuille excel,
mais toujours pareil une croix rouge dans un rectangle blanc, y
at'il autre chose à faire pour que mon GIF soit lu ?

Merci d'avance à tous ceux qui ce pencheront sur mon problème.