boucle sur les checkbox

Marsh Posté le 21-03-2009 à 21:43:36

:??: :??: :??:
bonjour,

je cherche quelqu'un qui peu m'aider à resoudre mon problème qui est le suivant:
j'ai un questionnaire sur excel qui contient des checkbox. et je veux une boucle pour les balayer du haut de la feuille jusqu'au bas. dans mon cas ça marche pas avec "name".
j'ai eu l'idée de creer une boucle qui les balaye suivant leur position sur la feuille. par exemple en utilisant top et left.
je vous serai reconnaissant si vous pouvez m'aider à realiser cette idée ou me proposer une autre.
merci d'avance.

Marsh Posté le 21-03-2009 à 21:43:36

Marsh Posté le 24-03-2009 à 15:25:29

Bonjour

Il y a plus "simple". Dans les propriete du checkbox, tu peux l'affecter a une cellule. Et donc cette cellule aura comme valeur VRAI si la checkbox est cochée, et FAUX dans le cas contraire.
De plus, si tu saisis FAUX dans la cellule, la checkbox se decoche toute seule.
Dans les propriétés de ta checkbox, tu vas sur LinkedCell et tu mets la cellule servant de reference.
C'est beaucoup plus facile de traiter des cellules que les checkbox en elles memes.

Tu peux aussi te servir de Name, mais il faut connaitre au prealable le nom que tu leurs a donné. Toujours pareil, dans les propriétés.
Pour le cas d'utilisation de la propriété Name, des petits indices pour faire reference a tes CheckBox :

Code :

Sub toto()
z = Feuil1.OLEObjects.Count
For i = 1 To z
NomCtrl = Feuil1.OLEObjects(i).Name
If InStr(1, NomCtrl, "Check" ) <> 0 Then 'Si le nom contient Check, c'est une Checkbox
Feuil1.OLEObjects(i).Object.Value = False 'par exemple pour toutes les remettre a Faux
End If
Next
End Sub

Cordialement

Message édité par SuppotDeSaTante le 24-03-2009 à 15:26:23

---------------
Soyez malin, louez entre voisins !

Marsh Posté le 25-03-2009 à 13:56:51

je vous remercie pour votre reponse.c"était tres utile.

Sujets relatifs:

Leave a Replay

Make sure you enter the(*)required information where indicate.HTML code is not allowed

Name *

Email *

URL

Message *