Ceci est une page optimisée pour les mobiles. Cliquez sur ce texte pour afficher la vraie page.

Help Aide Vba pour traitement images

dooblemixte

XLDnaute Nouveau
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

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

Pièces jointes

  • Projet HH.zip
    405.2 KB · Affichages: 74
Dernière édition:
Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…