XL 2019 Syntaxe .Pictures.Insert

[PoloTaz67]

Bonsoir,
De guerre lasse je me tourne vers vous pour résoudre une énigme sur laquelle je butte depuis 3 heures
J'ai recopié et adapté un code pour mes besoins pour afficher une image dans un pseudo formulaire
Je m'explique
Le "formulaire" n'en est pas un juste une adaptation graphique
Dans le grand carré "Image", je veux par rapport à un code (art-00002) afficher l'image qui correspond et dont le lien apparait en A1
Le pb c'est que la syntaxe "With .Pictures.Insert("ImageLien") obtenu par " ImageLien = Range("A1") " n'est pas correcte et me donne l'erreur suivante.
"Erreur d'exécution '1004' Impossible de lire la propriété Insert dans la classe Picture"

J'ai essayé avec une recherche plus simple sur une autre feuille et en fermant le fichier contenant "Formulaire", cela fonctionne..... A n'y rien comprendre
Pouvez vous m'aider
Merci

 

[PoloTaz67]

Bonjour
Merci pour les réponses a mon pb que je n'avais pas lue, car mon pc ne permets pas l'ouverture de mail (au travail)
Je vais donc me pencher sur vos réponses
Je ne suis qu'un simple débutant et vous lire me fait toucher du doigt mon pauvre niveau....
Concernant la cellule A1 c'est le lien ou sont situés mes images sur un disque externe au pc
La macro devait aller a cette adresse, copier l'image et la coller une fois "rationnée" dans la plage de cellules fusionnées définies
Je vais essayer et reviendrais vers vous si cela ne fonctionne pas.
Merci

 

[PoloTaz67]

Bonsoir
Jai copié le code et essayé
Ne me blâmez pas; mais pour moi cela ne fonctionne pas
lorsque je change le n° de référence rien ne se produit
Je vous mets le xlsm pour que vous puisez voir ou cela coince
Merci
Svp une explication que je puisse comprendre
merci

 

[patricktoulon]

re
deja avant de regarder le code es tu sur du chemin regarde le bien
E:\Image GénéalogieCouronne Roi1.png

tu sur que ca n'est pas plutôt
E:\Image Généalogie\Couronne Roi1.png
ou
E:\Image Généalogie\Couronne\Roi1.png

démonstration chez moi avec une autre image ratio horizontal

démonstration avec image ration vertical

imparable

 

[PoloTaz67]

Chez moi voila ce qui se trouve dans en A1
E:\Image GénéalogieCouronne Roi1.png

 

[patricktoulon]

heu... oui on avais compris mais est ce que ce chemin est valide ????

 

[PoloTaz67]

chez moi il n'y a pas de altGr\ en séparation

 

[patricktoulon]

re
une derniere fois es tu sur d'avoir cette image ??????

 

[PoloTaz67]

oui

 

[PoloTaz67]

je vous aui donné le xlsm pkoi ne pas me le renvoyer comme il devrait

 

[patricktoulon]

ma fois il est possible que tu es un soucis de droit dans ce dossier

 

[PoloTaz67]

ce n'est pas un UseForm, est ce que cela fonctionne pareil avec des cellules fusionnées G4:I18

 

[patricktoulon]

mais tu mélange tout la
je t'ai donné un truc qui fonctionne si ça marche pas c'est que tu a un autre soucis

 

[PoloTaz67]

svp pouvez vous le modifier pour qu'une image s'affiche automatiquement lorsque je choisi par ex ART-0001
Je regarderais pour faire ma même chose pour le reste

 

[PoloTaz67]

tu sur que ca n'est pas plutôt
E:\Image Généalogie\Couronne Roi1.png
ou
E:\Image Généalogie\Couronne\Roi1.png

laquelle des deux options dois je avoir en lien?

 

[patricktoulon]

re
et comment veux tu que je fasse j'ai pas ton pc moi
ps je suis en train de regarder le tuto sur youtube avec le lien qu'il y a dans ta feuille
sincèrement c'est BIDON!!!