Insertion Image

[guy72]

Bonjour à tous
Actuellement, je fais appel de l'image Fleur.jpg dans ma Feuil1.
J'ai mis dans une macro :
ActiveSheet.Pictures.Insert("C:\Mes documents\Mes images\Fleur.jpg" ).Select.

Maintenant, j'ai mis cette image dans ma feuil4, je l'ai nommée Fleur.
Je voudrais, pouvoir mettre dans ma macro(à la pace du texte précédent)
La formule qu'il faut pour aller chercher l'image dans ma Feuil4 et la mettre dans ma Feuil1.
Est-ce possible ?
La raison est que je ne veux pas rappeler un autre fichier.
J'espère que je me suis bien expliqué ?

Cordialement
Guy

 

[pierrejean]

Re : Insertion Image

bonsoir guy72

a tester

    Sheets("Feuil4").Shapes("Fleur").Select
    Selection.Copy
    Sheets("Feuil1").Select
    ActiveSheet.Paste

 

[guy72]

Re : Insertion Image

Bonjour pierrejean
Désoler cela ne fonctionne pas, l'mage n'apparaît pas dans la feuille 1.
Merci quand même.
Cordialement
Guy

 

[pierrejean]

Re : Insertion Image

bonjour guy72

peux-tu mettre ton fichier S.T.P (sans données confidentielles, uniquement une image)

pour que je vois ce qui ne va pas

 

[guy72]

Re : Insertion Image

Re pierrejean
Excuse moi si si ça fonctionne;
Merci de ton aide.
Cordialement
Guy