Bonjour,

J ai un petit problem :
voila j ai un userform qui s apelle contenu dans ce userform il ya le label Plan a cote de ce Label il ya un Checkbox .

Bon quand je clique sur ce Label lan , il me donne un autre UserForm ou il ya un button :Graphique. et quand je clique sur Graphique je peux ajouter une image.

bon ma question c est que je veux une fois que je clique sur ce Button Graphique , le CheckBox qui es a cote de Label Plan est automatiquement coché.


Alors voila mon probleme je crois il est tres simple mais malheureusement je trouve pas la solution .

je vous donne mon code, lors quand je clique sur ce button Graphique pour ajouter une image .alors il faut que j ajoute quelque chose pour le Checkbox sera coché.


Code :
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
Private Sub Btn_6_Grafik_Aufbau_GrafikEinf_Click()
M00_Contenu.Che_0_auf.Value = True
Dim file As Variant
file = Application.GetOpenFilename("Alle Grafiktypen (*.*;*.*), *.*;*.*")
If file = "" Or file = False Then
Exit Sub
End If
Img_6_Aufbauplan.Picture = LoadPicture(file)
Worksheets("schematic_diagram").aufbau.Picture = LoadPicture(file)

End Sub
A Propos le M00_Contenu est un UserForm ,la ligne qui es coloré en rouge et le code que j ai ajoute mais malheureusement ,j ai meme le probleme il n est pas encore coche.ou il le faut ajouter ou bien c est pas ca le code ?

merci de votre reponse.

--------------------------------------------------------------------------------