Discussion :

[patricktoulon]

bonjour


comment inserer un control image par macro dans un usf


merci d'avance

au plaisir

[zyhack]

Bonjour

a adapter

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

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

[patricktoulon]

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