Bonjour à tous.
Je développe pour mon travail un logiciel de positionement énergétique de sites industriels. J'ai besoin pour ce faire de faire apparaitre des courbes ou images en jpg par un formulaire appelé par un bouton. L'image est toujours à la même place.
(Grace à JB; j'ai réussi pour les graphiques)
J'ai donc essayé le code suivant:
Private Sub UserForm_Initialize()
Sheets("Courbepositionnement").Select
Range("A1").Select
Me.Image1.Picture = LoadPicture("score.jpg")
End Sub
Bien entendu cela ne marche pas ( je m'en doutais un peu.) Si un érudit peut me dépanner?
Je développe pour mon travail un logiciel de positionement énergétique de sites industriels. J'ai besoin pour ce faire de faire apparaitre des courbes ou images en jpg par un formulaire appelé par un bouton. L'image est toujours à la même place.
(Grace à JB; j'ai réussi pour les graphiques)
J'ai donc essayé le code suivant:
Private Sub UserForm_Initialize()
Sheets("Courbepositionnement").Select
Range("A1").Select
Me.Image1.Picture = LoadPicture("score.jpg")
End Sub
Bien entendu cela ne marche pas ( je m'en doutais un peu.) Si un érudit peut me dépanner?