Image sous excel

Question

Bonjour,
 
J'aurais besoin de vos lumières.

La situation est la suivante: J'aimerai créer une macro pour Excel qui quand je l'execute 
   -   ouvre une fenetre avec une image dont le chamin est connu et le nom de l'image figure est dans la case A1.
   -   Dans cette fentre j'aimerai qu'il y ai un bouton fermer qui quand on clique dessus ferme la fenetre

Voila si vous pouvais m'éclairer sur un des points suivant faites moi signe.

michelxld · Answer

bonjour






Tu crées un Userform dans ton Classeur et tu y places un objet CommandButton et un objet Image (nommé Image1)


Ensuite ajoute cette macro qui va charger l'image lors de l'affichage du UserForm




Private Sub UserForm_Initialize()
Dim Fichier As String
Fichier = "C:\Documents and Settings\michel\dossier" & Range("A1")
Image1.Picture = LoadPicture(Fichier)
End Sub


Private Sub CommandButton1_Click()
Unload Me 'ferme l'UserForm
End Sub


 


Dans la cellule A1 , tu indiques le nom du fichier ( par exemple monImage.jpg )


 


Dans ta feuille de calcul tu inséres un CommandButton qui va permettre d'afficher l'UserForm


Private Sub CommandButton1_Click()
UserForm1.Show
End Sub


 


bonne soiree
michel

Image sous excel

1 réponse

Votre réponse

Discussions similaires