Help Aide Vba pour traitement images

[dooblemixte]

Fichier joint Projet HH

Bonjour ou bonsoir à tous et toutes

Après avoir vidé deux boites de doliprane, mes neurones me lâchent 😕
Mes recherches sur le net ne m’a pas permis de trouver une solution adéquate.🙁

Je fais appel à vos compétences pour un coup de main sur mon problème VBA

Ma question N° 1

Dans mon USF, je souhaite charger 4 images « Image1 – Image2-Image3-Image4 » qui par un clic sur chaque image ouvre le dossier \images. et sélectionne une image « en Jpg gif bmp »

A l’enregistrement chaque image doit être enregistrée à la dimension d’une cellule « en miniature » dans la procédure …

Extrait

Worksheets("BDD").Activate
Columns(53).Find("*", , , , , xlPrevious).Offset(1, 0).Select

ActiveCell = Image1
ActiveCell.Offset(0, 1).Select

ActiveCell = Image2
ActiveCell.Offset(0, 1).Select

ActiveCell = Image3
ActiveCell.Offset(0, 1).Select

ActiveCell = Image4
ActiveCell.Offset(0, 1).Selec

t

Dans un autre USF, les 4 images seront chargées avec la possibilité de les remplacer.

Ma question N° 2

Je voudrais faire un aperçu de l’USF avant impression.

Merci par avance de votre bienveillance.
Philippe

PS: Votre participation est pour une bonne cause celle d'une association d'hébergement ou je suis bénévole.

 

[Compte Supprimé 979]

Re : hELP Astuce en Vba pour traitement images

Bonsoir

Sans fichier c'est dommage 🙄

 

[dooblemixte]

Re : Help Aide Vba pour traitement images

Merci du conseil Bruno Fichier joint
Cordialement