inserer un control image

bonjour


comment inserer un control image par macro dans un usf


merci d'avance

au plaisir

Bonjour

a adapter

Code:

---

1 2 3 4 5 6 7 8 9 10 11 12 13 14

Private Sub UserForm_Initialize() Dim Obj As Control   Set Obj = Me.Controls.Add("forms.image.1") With Obj .Name = "MonImage" .Left = 30 .Top = 30 .Width = 100 .Height = 100 End With   MsgBox Obj.Name & " ajouté dans l'UserForm." End Sub

---

merci Zyhack

c'est ce que j'avais fait mais ca ne fonctionnait pas

mais j'ai trouvé le probleme

en fait j'ai installé le OWC11 pour les graphique dans les userform
et figure toi qu il m'a chunter un e sacré palenqué de la librairie classique de microsoft la je peux te dire que j'ai rien compris
purrée de zut
j'ai ete obligé de reinstaller windows avec mon image disck



en esperant que ca serve a quelqu'un


merci encore zihack

au plaisir