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

F

formateurmasque

Guest

• 29 Février 2008

• #2

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

 

Vote positif 0 Vote négatif

L

lcoulon

XLDnaute Occasionnel

• 29 Février 2008

• #3

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,

 

Pièces jointes

• Macro cases a cocher.zip

  6.1 KB · Affichages: 232

Vote positif 0 Vote négatif

Cousinhub

XLDnaute Barbatruc

• 29 Février 2008

• #4

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

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

Code:

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

 

Vote positif 0 Vote négatif

L

lcoulon

XLDnaute Occasionnel

• 29 Février 2008

• #5

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

Merci bhbh, tu es génial 😀

 

Vote positif 0 Vote négatif

T

tefeceric

Guest

• 18 Septembre 2009

• #6

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

bhbh à dit:

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

Code:

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

Cliquez pour agrandir...

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

 

Dernière modification par un modérateur: 18 Septembre 2009

Vote positif 0 Vote négatif

soenda

XLDnaute Accro

• 18 Septembre 2009

• #7

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

 

Pièces jointes

• CasesACocher.xls

  46.5 KB · Affichages: 277
• CasesACocher.xls

  46.5 KB · Affichages: 284
• CasesACocher.xls

  46.5 KB · Affichages: 293

Vote positif 0 Vote négatif

T

tefeceric

Guest

• 18 Septembre 2009

• #8

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

soenda à dit:

Bonjour le fil, lcoulon, formateurmasque, bhbh, tefeceric

Un essai avec les cellules liées

A plus

Cliquez pour agrandir...

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

 

Vote positif 0 Vote négatif

dame et roi

XLDnaute Occasionnel

• 19 Septembre 2009

• #9

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

 

Pièces jointes

• doublecasesàcocher.xls

  40 KB · Affichages: 135

Dernière édition: 19 Septembre 2009

Vote positif 0 Vote négatif

Dull

XLDnaute Barbatruc

• 19 Septembre 2009

• #10

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

 

Pièces jointes

• doublecasesàcocherDameetRoi.zip

  17.1 KB · Affichages: 93
• doublecasesàcocherDameetRoi.zip

  17.1 KB · Affichages: 93
• doublecasesàcocherDameetRoi.zip

  17.1 KB · Affichages: 100

Dernière édition: 19 Septembre 2009

Vote positif 0 Vote négatif

dame et roi

XLDnaute Occasionnel

• 19 Septembre 2009

• #11

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

 

Vote positif 0 Vote négatif

dame et roi

XLDnaute Occasionnel

• 19 Septembre 2009

• #12

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.

 

Pièces jointes

• CasesACocher.xls

  42 KB · Affichages: 131
• CasesACocher.xls

  42 KB · Affichages: 124
• CasesACocher.xls

  42 KB · Affichages: 130
• doublecasesàcocherDameetRoi.zip

  17.1 KB · Affichages: 63
• doublecasesàcocherDameetRoi.zip

  17.1 KB · Affichages: 76
• doublecasesàcocherDameetRoi.zip

  17.1 KB · Affichages: 71

Vote positif 0 Vote négatif

soenda

XLDnaute Accro

• 20 Septembre 2009

• #13

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

Bonsoir le fil, tefeceric, Dull, dame et roi

Voir la PJ

A plus

 

Pièces jointes

• doublecasesàcocherTest.xls

  49 KB · Affichages: 114

Dernière édition: 20 Septembre 2009

Vote positif 0 Vote négatif

L

Lii

XLDnaute Impliqué

• 20 Septembre 2009

• #14

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.

 

Pièces jointes

• CasesàCocher ou pas.zip

  15.8 KB · Affichages: 131

Vote positif 0 Vote négatif

dame et roi

XLDnaute Occasionnel

• 20 Septembre 2009

• #15

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.

 

Vote positif 0 Vote négatif