Réinitialiser OptionButton avec un compteur

Fermé

thesentry Messages postés 874 Date d'inscription dimanche 31 janvier 2010 Statut Membre Dernière intervention 22 février 2020 - Modifié par thesentry le 3/02/2014 à 14:21
f894009 Messages postés 17185 Date d'inscription dimanche 25 novembre 2007 Statut Membre Dernière intervention 15 avril 2024 - 3 févr. 2014 à 17:37

Bonjour,

J'ai besoin de pouvoir réinitialiser différents OptionButton sur un USF.
Plutôt que de faire :

MonUserForm.OptionButton1.Value = False

MonUserForm.OptionButton2.Value = False

MonUserForm.OptionButton3.Value = False

MonUserForm.OptionButton4.Value = False

etc........

pour tous les USF, je souhaiterai le faire à l'aide d'un compteur.

Ce serait une chose dans ce style :

Dim i As Byte
For i = 2 to 6
Me.OptionButton(i).Value = False
Next i

Je sais que OptionButton(i) n'est pas correct mais c'est l'idée globale.

A savoir que tout se passe sur un même UF, que mes OptionButtons sont dans un Frame qui apparaît et disparaît au besoin.Et c'est quand il réapparaît que les OptionButtons doivent être réinitialisés (en gros, aucun ne doit être coché).

Merci

A voir également:

Réinitialiser OptionButton avec un compteur
Reinitialiser pc - Guide
Réinitialiser manette ps4 - Guide
Réinitialiser chromecast - Guide
Comment réinitialiser un ordinateur verrouillé - Guide
Réinitialiser ps4 - Guide

2 réponses

Réponse 1 / 2

Zoul67 Messages postés 1959 Date d'inscription lundi 3 mai 2010 Statut Membre Dernière intervention 30 janvier 2023 149
Modifié par Zoul67 le 3/02/2014 à 17:33

Bonjour,


    For Each Ctrl In Me.Controls
        If TypeName(Ctrl) = "OptionButton" Then Ctrl.Value = False
    Next Ctrl

A+

Réponse 2 / 2

f894009 Messages postés 17185 Date d'inscription dimanche 25 novembre 2007 Statut Membre Dernière intervention 15 avril 2024 1 701
3 févr. 2014 à 17:37

Bonjour,

For i = 2 To 6
    Me("optionbutton" & i) = False
Next i

Discussions similaires

Reset kidicom max

Discussions similaires

Newsletters