Décocher des cases à cocher

Le
Sunburn
Bonjour,
comment puis-je décocher toutes les "cases à cocher", par VBA, sur la
feuille "alpha12" par exemple ?

Merci

YANN
Vidéos High-Tech et Jeu Vidéo
Téléchargements
Vos réponses
Gagnez chaque mois un abonnement Premium avec GNT : Inscrivez-vous !
Trier par : date / pertinence
Corto
Le #17942971
Bonjour Sunburn,
Sub UnCheck()
For Each CB In Sheets("alpha12").OLEObjects
If CB.progID = "Forms.CheckBox.1" Then CB.Object.Value = Fals e
Next CB
End Sub

Corto

Sunburn a écrit :
Bonjour,
comment puis-je décocher toutes les "cases à cocher", par VBA , sur la
feuille "alpha12" par exemple ?

Merci

YANN




Sunburn
Le #17945531
OK, je te remercie

"Corto" a écrit :

Bonjour Sunburn,
Sub UnCheck()
For Each CB In Sheets("alpha12").OLEObjects
If CB.progID = "Forms.CheckBox.1" Then CB.Object.Value = False
Next CB
End Sub

Corto

Sunburn a écrit :
> Bonjour,
> comment puis-je décocher toutes les "cases à cocher", par VBA, sur la
> feuille "alpha12" par exemple ?
>
> Merci
>
> YANN
>
>



Publicité
Poster une réponse
Anonyme