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

lien une image a une cellule

angoul

XLDnaute Impliqué
Bonjour
J'ai cette petite macro qui me permet d'inserer une image dans sa taille reel sur une une feuille excel
j'aimerai que cette image soit mise en cellule M1
voici ma macro "
Sub InsertImage() 'telechargement image
ScreenUpdating = False
filetoOpen = Application.GetOpenFilename("Fichiers JPG (*.jpg), *.jpg")
If filetoOpen <> False Then ActiveSheet.Pictures.Insert(filetoOpen).Select
MsgBox "Ouvrir " & filetoOpen
End Sub

comment peut t'on faire?

merci de votre aide
 

gilbert_RGI

XLDnaute Barbatruc
Re : lien une image a une cellule

peut-être que le demande n'est pas très bien expliquée

la croix rouge par exemple c'est pour excel ou l'userform

l'image à quel moment doit-elle apparaitre en M1 (humm .... )
 

angoul

XLDnaute Impliqué
Re : lien une image a une cellule

Alors voila, on clique sur le trombonne, cela ouvre une boite de dialogue pour selectionner l'image et ensuite j'aimerai quelle soit coller en cellule M1, avec sa dimension d'origine.
 

gilbert_RGI

XLDnaute Barbatruc
Re : lien une image a une cellule

Alors voila, on clique sur le trombonne, cela ouvre une boite de dialogue pour selectionner l'image et ensuite j'aimerai quelle soit coller en cellule M1, avec sa dimension d'origine.
alors voilà pour le click sur le trombone
 

Pièces jointes

  • test-1.xlsm
    62.8 KB · Affichages: 28
  • test-1.xlsm
    62.8 KB · Affichages: 37
  • test-1.xlsm
    62.8 KB · Affichages: 40

Discussions similaires

Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…