Boite de dialogue : case a cocher

[djdamien51]

Bonjour a tous,

J'ai créé une macro avec une boite de dialogue avec des cases à cocher.
Par exemple si je coche la 1ère case il me supprime le texte d'une cellule.

Mon problème : lorsque je relance ma macro une seconde fois, comme ma cellule est déja vide, j'aimerai que la 1ère case soit déja coché.

Est-ce possible?

Si je ne suis pas clair n'hésitez pas a me de le dire.

merci de vos réponses.

 

[tototiti2008]

Re : Boite de dialogue : case a cocher

Bonjour djdamien,

dans l'évènement Userform_Initialize, il faut que tu teste la valeur de tes cellules pour faire correspondre les cases (cochées ou non)

en l'absence de fichier, je ne peux pas être beaucoup plus précis...

 

[Dull]

Re : Boite de dialogue : case a cocher

Salut djdamien51 et Bienvenu, Tototiti, le Forum

Peut être comme cela mais comme Le dit tototiti
avec un Extrait de Fichier ça serait mieux

Private Sub UserForm_Initialize()
CheckBox1 = IIf(Range("A1") = "", True, False)
CheckBox2 = IIf(Range("A2") = "", True, False)
End Sub

Bien sur les Range (Cellules )sont à adapter
Bonne Journée

 

[djdamien51]

Re : Boite de dialogue : case a cocher

voici le fichier exemple

 

[tototiti2008]

Re : Boite de dialogue : case a cocher

Bonjour Dull,

Il suffit donc d'adapter le code de Dull ainsi (dans le code de l'Userform)

Private Sub UserForm_Initialize()
CheckBox1 = IIf(Range("A6") = "", True, False)
CheckBox2 = IIf(Range("A8") = "", True, False)
End Sub

 

[djdamien51]

Re : Boite de dialogue : case a cocher

Ok, merci beaucoup c'est parfait.

Et merci aussi pour la rapidité de vos réponse, c'est rare des forum comme celui la.