Salut Sergio, salut tout le monde,
voici un embryon de code qui doit correspondre à ta demande.
Réponds si c'est OK
Attention ! dans l'en-tête du module Affiche tu dois rentré le bon chemin d'acces à tes photos dans NomChemin et l'extention (précédée d'un point) dans Ext. Cette extension doit être reconnue par ton programme Excel.
De plus les images seront affichées à leurs tailles d'origines. pour changer leur taille tu peux utiliser l'instruction:
Selection.ShapeRange.ScaleWidth 0.56, msoScaleFromTopLeft
Selection.ShapeRange.ScaleHeight 0.56, msoScaleFromTopLeft
où 0.56 est le coefficient multiplicateur (qui peut-être <1 ou >1) de tes images en largeur puis en hauteur. Ces valeurs peuvent être différentes mais ça déformera tes photos.
Il vaut mieux, et de loin, uniformiser avant la taille de tes photos avec un logiciel de traitement d'images. Ca simplifie bougrement les procédures.
Si tu connais tant soit peu VBA, Access n'est pas mal non plus pour gérer ce genre de fichier.
A +
ChS