Image

MJ13

XLDnaute Barbatruc

• 31 Décembre 2009

• #2

Re : Image

Bonjour

Fait avec l'enregistreur de macros:

Code:

Sub Insere_Image()
'
' insere_image Macro
'
'
    ActiveSheet.Pictures.Insert( _
        "C:\Program Files\Microsoft Office\MEDIA\CAGCAT10\j0302827.jpg").Select
End Sub

 

Vote positif 0 Vote négatif

C

cora

XLDnaute Occasionnel

• 31 Décembre 2009

• #3

Re : Image

Je ne comprend pas ou cette image est cachée au départ, deplus, je souhaite que l'image apparaisse au centre de la feuille. est-ce possible?
Merci

 

Vote positif 0 Vote négatif

MJ13

XLDnaute Barbatruc

• 31 Décembre 2009

• #4

Re : Image

Re

La, je ne vois pas.

Je passe la main.

 

Vote positif 0 Vote négatif

C

cora

XLDnaute Occasionnel

• 31 Décembre 2009

• #5

Re : Image

merci car même

 

Vote positif 0 Vote négatif

MJ13

XLDnaute Barbatruc

• 31 Décembre 2009

• #6

Re : Image

Re

Si tu as qu'un objet sur ta feuille:

A tester et à adapter.

Code:

Sub Deplace_image()
    Range("A1").Select
    ActiveSheet.DrawingObjects.Select
    Selection.Cut
    Range("G12").Select
    ActiveSheet.Paste
End Sub

Sinon, pensons très fort au fichier qui permet de s'affranchir de ces longues discussions stériles 🙂.

Sinon, je te conseille le site de JB qui est très bien fait pour ce type de demande.

 

Dernière édition: 31 Décembre 2009

Vote positif 0 Vote négatif