Bonjour à tous,
J'ai un petit souci afin de faire afficher une image contenu dans une feuille au sein d'un userform nommé "Formulaire".
Voici mon code, qui ne fonctionne pas ... :
Comme vous pouvez le voir j'ai essayé différentes méthodes ... et j'obtiens l'erreur 438 : propriété ou méthode non gérée par cet objet ...
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10 Private Sub UserForm_Initialize() Application.DisplayAlerts = False Application.ScreenUpdating = False '----------------------Chargement de l'image---------------------------- 'Formulaire.Image1.Picture = Sheets("Rapport").Image1.Picture 'Formulaire.Image1.Picture = Sheets("Rapport").Shapes("Image1").Picture ImageList1.ListImages.Add , "Cle1", Sheets("Rapport").Image1.Picture Me.Image1.Picture = ImageList1.ListImages(2).Picture
Merci d'avance de votre aide.
GK
Partager