lecture de gif dans excel et VBA ?

Le
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: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.
Vidéos High-Tech et Jeu Vidéo
Téléchargements
Vos réponses
Gagnez chaque mois un abonnement Premium avec GNT : Inscrivez-vous !
Trier par : date / pertinence
isabelle
Le #18029201
bonjour Warphil,

Private Sub UserForm_Initialize()
WebBrowser1.Navigate _
"about:<html><body scroll='no'>" & _
" 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'>" & _
" 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.


Warphil
Le #18032131
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'>" & _
" 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'>" & _
" 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.




Corto
Le #18032221
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'>" & _
" 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.


isabelle
Le #18032511
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'>" & _
" 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'>" & _
" 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.







Warphil
Le #18034951
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'>" & _
" 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'>" & _
" 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.









Warphil
Le #18034941
Bonjour Corto,

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

warphil

"Corto" 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'>" & _
" 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.


Warphil
Le #18088901
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" 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'>" & _
" 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.


isabelle
Le #18091041
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'>" & _
" 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'>" & _
" 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'>" & _
" 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.












Publicité
Poster une réponse
Anonyme