Re DBP,
'Vous me dites un nom de l'image??? n'a-t-il pas une extension?
Je voudrais incorporer l'image dans le fichier et non qu'il reste à l'extérieure comment faire?
Moi au départ je pensais que l'image était mis comme l'indiquais Philippe par Insertion/Image... et ensuite par la programmation faire l'action que fait le fichier de @+Thierry d'où ma recherche pour n'aboutir à rien puisque je reste sur 'Image1'(s) ou 'Image2' sans possibilité de voir l'insertion pour effectuer le changement. '
Pour cette période, tu es sur une feuille Excel. Donc, Menu : Insertion -> Image -> A partir d'un fichier, et là dans l'explorateur tu choisis l'endroit où tu as stocké cette image, et pour finir tu selectionnes l'image de ton choix. Désormais elle apparaît sur la feuille Excel proprement dite. Selon son nom, il conviendra de modifier dans VBE 'ActiveSheet.Shapes('LE NOM DANS EXCEL').Visible = True ET SUIVANT...
Le fichier joint n'est qu'une image de ce que j'ai voulu dire tout à l'heure. Si rien n'apparaît cliques simplement sur l'image et son nom sera indiqué à gauche de la barre de formule. Ici c'est 'Image 1'
En ce qui concerne l'autre commande je n'ai pas eu le temps de voir, mais elle n'est pas forcément nécessaire dans l'immédiat. Je n'ai plus trop de temps ce soir.
Aparté : Comme toi, j'ai longtemps programmé en Basic, un petit retour en arrière avec le Fortan et comme toi le Pascal, (le même) et un peu de C avant extinction des machines. Depuis j'ai découvert VBA et plus j'avance avec ce langage puissant, plus les marches me semble de plus en plus hautes.
Les fichiers de @+Thierry, j'en ai vu , combien trente, quarante, cinquante, et personnellement s'ils m'ont tous épaté, certains m'ont conduit à des heures et des heures de cogitations.
Donc, pour en revenir à cette commande : Sheets('Interface').Shapes('Image1').Visible = False' pas de 'True' et
'Sheets('Interface').Shapes('Image2').Visible = False' pas de 'True'. Hors de son contexte, je ne peux en dire plus.
Mets une apostrophe devant chaque ligne pour les neutraliser, il serra grand temps plus tard d'y revenir. Il vaut mieux aller à petits
pas.
J'espère sue cela va te faire avancer un peu pour ce soir.
Bonne nuit.
Jean-Pierre