CheckBox du UserForm coche CheckBox

[Touna]

Bonjour,

Cela fait quelques jours que je bataille sur un petit problème que je vous expose :

J'ai crée un document dans lequel il y a un UserForm, ce UserForm contient un CheckBox que je souhaiterais coupler avec le CheckBox de mon document et une case à cocher, afin qu'ils se cochent ensemble.

Pour être plus claire, j'ai essayé d'illustrer mon problème avec ce fichier excel.

Merci d'avance

Touna

 

[kjin]

Re : CheckBox du UserForm coche CheckBox

bonjour,
Sans passer par one cellule intermédiaire, renomme ta case à cocher "MaCase" et dans le formulaire

Private Sub CheckBox1_Click()
Feuil1.DrawingObjects("MaCase") = CheckBox1
End Sub

A+
kjin

 

[Touna]

Re : CheckBox du UserForm coche CheckBox

Bonjour kjin,

et surtout merci pour ta rapidité.
J'ai essayé tes conseils, mais malheureusement cela ne marche pas, ça bloque à "Feuil1.DrawingObjects".

De plus dans l'exemple, que j'ai mis en ligne pourquoi le CheckBox1 de mon document est coché en gris en non en noir ?
Merci d'avance,
Touna

 

[kjin]

Re : CheckBox du UserForm coche CheckBox

bonjour,
Voir PJ
Note qu'on pourrait aussi se passer complètement de [A1]
A+
kjin

 

[Touna]

Re : CheckBox du UserForm coche CheckBox

Bonjour, et merci beaucoup, vous êtes formidable.
Touna