Sujet Précédent Sujet Suivant

Probleme pour inserer une image Gif sous excel 2016

Fermé
skopg Messages postés 74 Date d'inscription vendredi 10 octobre 2014 Statut Membre Dernière intervention 13 octobre 2018 - 19 sept. 2015 à 20:22
Le Pingou Messages postés 12041 Date d'inscription mercredi 11 août 2004 Statut Contributeur Dernière intervention 22 avril 2024 - 22 sept. 2015 à 20:22
Bonsoir le forum,

je ne sais pas insérer une image Gif dans une feuille Excel je suis sous Excel 2016.

Mon problème est que le Microsoft Web Browser me donne des erreurs voir images jointes.

Vous aurez compris que j'aimerais mettre une image Gif dans une feuille Excel et que celle-ci s'anime dès que je clique ( ou ) que je me trouve sur cette feuille.

Merci de votre aide

Skopg

A voir également:

20 réponses

Réponse 1 / 20
Le Pingou Messages postés 12041 Date d'inscription mercredi 11 août 2004 Statut Contributeur Dernière intervention 22 avril 2024 1 426
19 sept. 2015 à 23:07
Bonjour,
Eh bien avec Excel 2013 il faut aller sur l'onglet « Insertion » et ensuite dans le bloc « Illustrations » vous avez le choix sur Images ou Images en ligne.... !

0
Réponse 2 / 20
skopg Messages postés 74 Date d'inscription vendredi 10 octobre 2014 Statut Membre Dernière intervention 13 octobre 2018
20 sept. 2015 à 15:47
Bonjour Pingou,

merci de répondre mais et oui il y a un mais .....soit par image ou image web celle-ci ne s'anime pas.

si vous voyez autre chose ,car ma question je pense est assez précise j'ai bien sur essayer pas mal de chose avant de poster sur le forum pour avoir j'espère une solution à mon problème.

Citation: Einstein disait il y a une solution à tout problème si on ne trouve pas c'est que le problème est mal poser.

Dans l'attente de vous lire.
Skopg
0
Réponse 3 / 20
Le Pingou Messages postés 12041 Date d'inscription mercredi 11 août 2004 Statut Contributeur Dernière intervention 22 avril 2024 1 426
20 sept. 2015 à 15:59
Bonjour,
Désolé, je n'ai pas fait attention à la fin du message «que celle-ci s'anime dès que je clique ».
Faites donc un petit saut par là.

0
Réponse 4 / 20
skopg
20 sept. 2015 à 16:49
Bonjour Le Pingou,

j'ai fais un saut comme vous dites et je retrouve tous les liens ou sites que j'ai déjà visité......( et Dieu sait si j'en ai fais ).
Mon réel problème avant d'insérer mon image est que le " Microsoft Web Browser " ne fonctionne pas voir images jointes avec ma 1ere demande sur le forum.

Bàv
skopg
0

Vous n’avez pas trouvé la réponse que vous recherchez ?

Posez votre question
Réponse 5 / 20
Le Pingou Messages postés 12041 Date d'inscription mercredi 11 août 2004 Statut Contributeur Dernière intervention 22 avril 2024 1 426
20 sept. 2015 à 18:19
Bonjour,
Il faut l'insérer dans un formulaire (UserForm) et ça marche.
Voir aussi les informations ici : https://docs.microsoft.com/fr-fr/office365/troubleshoot/administration/insert-scriptable-activex-control

0
Réponse 6 / 20
skopg Messages postés 74 Date d'inscription vendredi 10 octobre 2014 Statut Membre Dernière intervention 13 octobre 2018
20 sept. 2015 à 19:32
Bonsoir Le Pingou,

merci de me répondre rapidement mais j'ai déjà fais ça ( voir image ) mais mon but c'est de ne pas avoir d'Userform JUSTE l'image Gif dans la feuille.

Je crois sauf erreur de ma part si je suis les recommandations faites via le lien que tu m'as fourni que je ne saurai pas faire cette action sous Excel 2016.

Bàt
@+ skopg
0
Réponse 7 / 20
Le Pingou Messages postés 12041 Date d'inscription mercredi 11 août 2004 Statut Contributeur Dernière intervention 22 avril 2024 1 426
20 sept. 2015 à 22:54
Bonjour,
Merci du retour.
Pour ma part je vous déconseille de modifier les informations du registre comme mentionné dans l'article du lien si vous n'êtes pas expert ....
Quelle est votre but de vouloir absolument mettre une image animée sur une feuille du classeur ?

0
Réponse 8 / 20
skopg Messages postés 74 Date d'inscription vendredi 10 octobre 2014 Statut Membre Dernière intervention 13 octobre 2018
20 sept. 2015 à 23:39
Bonsoir Le Pingou,

tout simplement comme vous le voyez c'est un coureur comme image et dans mon classeur j'ai un graphique avec toutes les sorties faites et j'aurais aimé avoir simplement ce vélo animé quand on regarde le graphique...

Merci

Bàv
skopg
0
Réponse 9 / 20
Le Pingou Messages postés 12041 Date d'inscription mercredi 11 août 2004 Statut Contributeur Dernière intervention 22 avril 2024 1 426
21 sept. 2015 à 10:29
Bonjour,
Vous pouvez le faire selon l'exemple : https://www.cjoint.com/c/EIviCwClN2Y

0
Réponse 10 / 20
skopg Messages postés 74 Date d'inscription vendredi 10 octobre 2014 Statut Membre Dernière intervention 13 octobre 2018
21 sept. 2015 à 17:35
Bonjour Le Pingou,

merci du retour mais....aie à nouveau ce mais quand je vais sur accueil j'ai
"WebBrowser1.Document.body.Scroll = "no".
dans la feuil1 il y a un cadre avec " Cette page ne peut afficher.........."
et sur feuil2 "WebBrowser1.Document.body.Scroll = "no"

J'ai installé office 2010 et 2013 il n'y a que sur 2010 que ces erreurs arrivent car sur 2013 même problème que 2016 " Microsoft Web Browser " me donne .....voir premier message.

Comment faire partir ce cadre et les ascenseurs de droite et gauche et faire venir l'image gif ( animée ).

Merci pour votre temps et patience.
Bàv
skopg
0
Réponse 11 / 20
Le Pingou Messages postés 12041 Date d'inscription mercredi 11 août 2004 Statut Contributeur Dernière intervention 22 avril 2024 1 426
21 sept. 2015 à 22:13
Bonjour,
Est-ce que le problème survient avec mon exemple ou votre application ?

0
Réponse 12 / 20
gbinforme Messages postés 14946 Date d'inscription lundi 18 octobre 2004 Statut Contributeur Dernière intervention 24 juin 2020 4 684
21 sept. 2015 à 22:38
Bonjour skopg, Le Pingou,

mon but c'est de ne pas avoir d'Userform JUSTE l'image Gif dans la feuille.

Tu as ici une astuce qui fonctione ainsi
0
Le Pingou Messages postés 12041 Date d'inscription mercredi 11 août 2004 Statut Contributeur Dernière intervention 22 avril 2024 1 426
21 sept. 2015 à 22:45
Bonjour gbinforme,
Oui c'est exact sauf que sur Excel 2010, 2013 le control (Web Browser] ne peut pas être insérer sur la feuille pour des raisons de sécurité voirla doc de MS.
Amicales salutations.
Le Pingou
0
Réponse 13 / 20
Le Pingou Messages postés 12041 Date d'inscription mercredi 11 août 2004 Statut Contributeur Dernière intervention 22 avril 2024 1 426
21 sept. 2015 à 23:32
Bonjour skopg,
je pense qu'il y a une petite confusion ; soit :
1.- vous mettez une image et là c'est sur la feuille
2.- si image animé vous devez passer par une [UserForm] comme sur mon exemple

0
Réponse 14 / 20
skopg Messages postés 74 Date d'inscription vendredi 10 octobre 2014 Statut Membre Dernière intervention 13 octobre 2018
22 sept. 2015 à 00:06
Bonsoir Le Pingou,

oui le problème vient de votre exemple avec 2016 il donne



avec 2013 il donne

http://static.commentcamarche.net/www.commentcamarche.net/pictures/WkwVmOkiQiNckmdCiHocHFc6EGqSCdUZRQH9fHojgFXX9RjOYnntMCKQQhapblwl-probleme-2013.png
|fancy]

et avec 2010

le cadre sur feuille1 et " WebBrowser1.Document.body.Scroll = "no" " sur la feuille2

je sais faire fonctionner le gif voir message 6 avec ce type de code;
feuil1; Private Sub Worksheet_Activate()
ActiveWindow.DisplayVerticalScrollBar = False
End Sub

Private Sub Worksheet_Deactivate()
ActiveWindow.DisplayVerticalScrollBar = True
End Sub

userform;Private Sub UserForm_Initialize()
Dim S As String
Dim Hauteur As Long, Largeur As Long
Dim LePath As String

LePath = ActiveWorkbook.Path & "\"
Largeur = WebBrowser1.Width * 140 / 110
Hauteur = WebBrowser1.Height * 400 / 410
'Le nom du fichier Zip
S = LePath & "velo11.gif"

WebBrowser1.Navigate _
"ABOUT:<HTML><CENTER><HEAD><body scroll='no' LEFTMARGIN=0 TOPMARGIN=0><IMG WIDTH=" & _
Largeur & " HEIGHT=" & Hauteur & _
" SRC='" & S & "'</IMG></BODY></CENTER></HTML>"
End Sub

et bien sur un module pour faire fonctionner l'userform.

Mais et oui ce fameux mais est-il possible de le faire SANS Userform que quand je me trouve sur la feuil1 mon IMAGE est ANIMEE!!!!!!!

Merci à vous ( Le Pingou et Gbinforme )
Dans l'attente de vous lire

skopg
0
Réponse 15 / 20
Le Pingou Messages postés 12041 Date d'inscription mercredi 11 août 2004 Statut Contributeur Dernière intervention 22 avril 2024 1 426
22 sept. 2015 à 13:49
Bonjour,
Je pense qu'il manque une référence dans l'éditeur VBA.
Dans l'éditeur sous Outils / Référence que vous avez bien les éléments cochés comme suit :

0
Réponse 16 / 20
Le Pingou Messages postés 12041 Date d'inscription mercredi 11 août 2004 Statut Contributeur Dernière intervention 22 avril 2024 1 426
22 sept. 2015 à 14:00
Bonjour,
Concerne : avec 2013 il donne...
S'il est corrompu c'est chez vous que cela se passe, essayer de le recharger une nouvelle fois.

0
Réponse 17 / 20
skopg Messages postés 74 Date d'inscription vendredi 10 octobre 2014 Statut Membre Dernière intervention 13 octobre 2018
22 sept. 2015 à 16:02
Bonjour Le Pingou,

suivant le ms 6 j'ai bien tout ce qui est coché et pour que cela fonctionne....
j'ai appliqué le code qui se trouve ms 15 et ca fonctionne pour 2010,2013 et pour 2016 il me faut enlever le module ote croix.

Mais est-il possible de placer lors du clique sur la feuille1 ou 2 l'userform plus sur la gauche ou droite voire plus bas.

merci de votre aide.

skopg
0
Réponse 18 / 20
Le Pingou Messages postés 12041 Date d'inscription mercredi 11 août 2004 Statut Contributeur Dernière intervention 22 avril 2024 1 426
22 sept. 2015 à 17:30
Bonjour,
Le code du message 15 me parait vraiment étrange ...... !
Est-il possible de voir une copie de votre fichier sur https://www.cjoint.com/ et poster le lien ?

0
Réponse 19 / 20
skopg Messages postés 74 Date d'inscription vendredi 10 octobre 2014 Statut Membre Dernière intervention 13 octobre 2018
22 sept. 2015 à 19:39
Bonjour Le Pngou,

voici comme demandé ;
http://www.cjoint.com/c/EIwrIHYmUKb

Bàv

skopg
0
Réponse 20 / 20
Le Pingou Messages postés 12041 Date d'inscription mercredi 11 août 2004 Statut Contributeur Dernière intervention 22 avril 2024 1 426
22 sept. 2015 à 20:22
Bonjour,
Merci pour le fichier.
Toutefois je me demande quand même si mon exemple sert à quelque chose .....
Mais bon chacun est libre.

0