Macro pour tout cocher ou décocher d'un coup

[lcoulon]

Bonjour


Je cherche a réaliser 2 petites macros qui me permettraient grâce a un bouton de cocher TOUTES les cases à cocher d'une feuille de calcul,

et de la même façon, un autre bouton pour toutes les décocher d'un seul coup.

Merci de votre aide,

 

[formateurmasque]

Re : Macro pour tout cocher ou décocher d'un coup

Les cases sont dans un userform ? ou sur la feuille ?

Une fichier d'exemple serait bien.

FM

 

[lcoulon]

Re : Macro pour tout cocher ou décocher d'un coup

Les cases a cocher sont la feuille, insérées depuis la barre d'outils formulaires.

les cases a cocher qui seront a traiter d'un seul coup se trouvent en colonne B

Merci de ton aide,

 

[Cousinhub]

Re : Macro pour tout cocher ou décocher d'un coup

Bonjour,
tu avais presque la réponse dans ton code déjà utilisé 😉

Sub coche_tout()
For Each coche In ActiveSheet.Shapes
    If coche.Name Like "Check*" Then coche.ControlFormat.Value = True
Next coche
End Sub

Sub decoche_tout()
For Each coche In ActiveSheet.Shapes
    If coche.Name Like "Check*" Then coche.ControlFormat.Value = False
Next coche
End Sub

 

[lcoulon]

Re : Macro pour tout cocher ou décocher d'un coup

Merci bhbh, tu es génial 😀

 

[tefeceric]

Re : Macro pour tout cocher ou décocher d'un coup

Bonjour,
tu avais presque la réponse dans ton code déjà utilisé 😉

Sub coche_tout()
For Each coche In ActiveSheet.Shapes
    If coche.Name Like "Check*" Then coche.ControlFormat.Value = True
Next coche
End Sub

Sub decoche_tout()
For Each coche In ActiveSheet.Shapes
    If coche.Name Like "Check*" Then coche.ControlFormat.Value = False
Next coche
End Sub

Bonjour,
J'ai 60 cases et ca prend trop de temps (3-4 min) quand j'execute cette macro sous ma feuille excel.
N'y a t il pas un moyen plus rapide?
Merci

 

[soenda]

Re : Macro pour tout cocher ou décocher d'un coup

Bonjour le fil, lcoulon, formateurmasque, bhbh, tefeceric

Un essai avec les cellules liées

A plus

 

[tefeceric]

Re : Macro pour tout cocher ou décocher d'un coup

Bonjour le fil, lcoulon, formateurmasque, bhbh, tefeceric

Un essai avec les cellules liées

A plus

Super, merci! Ca doit s'appliquer à mon cas.
Chapeau! 😉

 

[dame et roi]

Re : Macro pour tout cocher ou décocher d'un coup

Bonjour à tous🙂,

Excellent travail. Chapeau. J'ai un petit problème à vous soumettre:
Comment TOUT cocher ou decocher automatiquement si et seulement si les celulles de la colonne B de la feuille1 sont non vides (si b4 est non vide alors cocher ou decocher a4 etc...) ?

Aussi, je souhaiterai savoir comment faire pour comptabiliser les cases cocher ou decocher et pour ce bien sur, avec la condition que les celulles dans la colonnes B sont non vide?
Le résultat sera une valeur mise dans une cellule en c1 par exemple.
Aie, je pense que ca complique un peu beaucoup. Pour moi, en tout cas...

🙄

Voir le fichier joint

Merci par avance,
amicalement

 

[Dull]

Re : Macro pour tout cocher ou décocher d'un coup

Salut dame et roi, le Fil

Un essai en Pièce Jointe

Sur la Première feuille le fichier de soenda modifié à tes besoins
en Feuille 2 Une autre idée sans case à coché mais avec avec la police Wingdings au Changement de valeur en Col A et une Troisième Feuille avec Bouton Coche/Décoche

à Tester
Bonne Journée

 

[dame et roi]

Re : Macro pour tout cocher ou décocher d'un coup

Bonjour Dull🙂,

Je te remercie pour ton travail et le temps passé dessus.
C'est presque parfait, à un détail prêt qui me pose un soucis:
Lorsque je veux trier par ordre croissant les mots contenus dans la colonne B (menu donnée-trier-colonne B-croissant-ok), les cases cochées ou décochées NE CORRESPONDENT PLUS AVEC LE TEXTE DANS LA COLONNE B. Il faudrait que les cases à cocher suivent et se déplacent en même temps que le texte.

Peut tu y remedier stp.
A part ca, ca fonctionne bien. Merci encore.

A bientôt, jerome

 

[dame et roi]

Re : Macro pour tout cocher ou décocher d'un coup

Bonsoir à tous🙂,

La journée a été courte. J'ai cherché, mais je n'ai pas trouvé.
Je joint deux fichiers:
-le fichier casesàcocher permet de tout cocher ou tout décocher sans se soucier des mots dans la colonne B. Mais la fonction de trie fonctionne sans perturber les cases à cocher.

-le fichier doublecasesàcocherdameetroi.zip est presque parfait. Mais il ne fonctionne pas lorsqu'on veut trier les mots dans la colonne B. Les cases à cocher ne correspondent plus au texte. C'est la "pagaille"

Il faut peut être s'aider d'un des codes vba du fichier caseacocher.

Pouvez vous m'aider svp à résoudre ce problème qui me trotte dans la tête. Merci par avance.

 

[soenda]

Re : Macro pour tout cocher ou décocher d'un coup

Bonsoir le fil, tefeceric, Dull, dame et roi

Voir la PJ

A plus

 

[Lii]

Re : Macro pour tout cocher ou décocher d'un coup

Bonjour,

pour m'être intéressé au problème ...
Avec bouton bascule
Avec ou sans Cases à Cocher.
L'évènementielle peut être remplacée par un bouton.

 

[dame et roi]

Re : Macro pour tout cocher ou décocher d'un coup

Bonjour Soenda et Lii🙂,

Je vous remercie pour vos réponses et le temps passé dessus. c'est génial ce que vous savez faire.
Merci encore.