XL 2019 Réouverture sujet "Picture.Insert"

[PoloTaz67]

Bonjour,
Hier je pensais que mon soucis avait été résolu mais ce matin il réapparaît
Je vous donne donc tout le fichier pour éventuellement trouver l'erreur
Synthèse du pb
Lorsque dans "Formulaire" s'arrête à:
If ImageLien = Empty Then
Exit Sub
End With
End Sub
A partir du menu déroulant "N° Article", la mise à jour des champs Nom, Prix, Description se fait normalement
lorsqu'on rajoute la suite, une erreur apparaît d'une part concernant:
"With.Picture.Insert(ImageLien) qu'il faut debogger
et
la mise à jour du formulaire ne se fait plus lorsqu'on active le menu deroulant
Ou est mon erreur?
Merci
Merci

 

[patricktoulon]

re
bonjour
dis moi un peu
tu te foutrais pas de la gueule du monde toi par hasard????
il n'y a rien de ce que je t'ai donné dans ton fichier et tu repart avec ton fichier

XL 2019 - Syntaxe .Pictures.Insert

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...

www.excel-downloads.com

 

[Pounet95]

Bonjour,
Sélectionner Shapes.AddPicture puis Appuyer sur F1
L'aide Micrisofr affiche -> Méthode Shapes.AddPicture (Excel)
la syntaxe devient donc
.Shapes.AddPicture ImageLien, True, True, 100, 100, 100, 100
où il faut adapter les paramètres en fonction des besoins !