VBA EXCEL - choisir un checkbox
Résolu
geraldao
Messages postés
9
Date d'inscription
Statut
Membre
Dernière intervention
-
geraldao Messages postés 9 Date d'inscription Statut Membre Dernière intervention -
geraldao Messages postés 9 Date d'inscription Statut Membre Dernière intervention -
A voir également:
- Vba checkbox value
- Excel compter cellule couleur sans vba - Guide
- Find vba - Astuces et Solutions
- Incompatibilité de type vba ✓ - Forum VB / VBA
- Mkdir vba ✓ - Forum VB / VBA
- Erreur 13 incompatibilité de type VBA excel ✓ - Forum Excel
5 réponses
Bonsoir,
En effet, c'est pas bien clair.
Tu peux toujours essayer ce code:
Option Explicit
Public vrb As String
Private Sub CheckBox1_Click()
If CheckBox1.Value = True Then
vrb = CheckBox1.Caption
MsgBox vrb
End If
End Sub
Il faudra recopier cette procédure pour chaque CheckBox et remplacer l'appel à Msgbox par ta procédure qui va exploiter la variable vrb.
En effet, c'est pas bien clair.
Tu peux toujours essayer ce code:
Option Explicit
Public vrb As String
Private Sub CheckBox1_Click()
If CheckBox1.Value = True Then
vrb = CheckBox1.Caption
MsgBox vrb
End If
End Sub
Il faudra recopier cette procédure pour chaque CheckBox et remplacer l'appel à Msgbox par ta procédure qui va exploiter la variable vrb.
Exactement ce que je fais mais a vrai dire je cherche à ne pas recopier la meme formule 50 fois, pensant qu'il existait une formule "générique" permettant de simplifier !!!
Enfin tant pis !! je copie ...
Merci a toi amigo.
Enfin tant pis !! je copie ...
Merci a toi amigo.
une formule generique du style => if chekbox1 or checkbox2 then vrb = active.checkbox.caption !!!!
;-)
;-)
Bonjour,
En fait, il faut savoir su tu veux gérer l'évènement au moment ou on clic sur la checkbox ou bien si tu veux recuperer les valeurs de toutes les checkbox une fois que tous les choix ont été fait.
Si tu veux gérer l'évènement click , il faut une procédue pour chaque checkox.
Si tu veux savoir quelles checkbox ont été marquées, une seule procedure activée par un bouton suffit.
ça dépend de l'utilisation que tu veux en faire.
Salut geraldao.
En fait, il faut savoir su tu veux gérer l'évènement au moment ou on clic sur la checkbox ou bien si tu veux recuperer les valeurs de toutes les checkbox une fois que tous les choix ont été fait.
Si tu veux gérer l'évènement click , il faut une procédue pour chaque checkox.
Si tu veux savoir quelles checkbox ont été marquées, une seule procedure activée par un bouton suffit.
ça dépend de l'utilisation que tu veux en faire.
Salut geraldao.
Bonjour,
Sur la userform , tu place un commandButton "OK" par exemple, qui va fermer la userform et va tester les checkbox une à une.
Ca peut ressembler à ça si un seul choix declenche une ou plusieurs actions:
sub CommandButton1_click()
userform1.hide 'on ferme le formulaire
If checkbox1.value=true then
'instrunctions
'.
Else
'.
End if
If checkbox2.value=true then
'instrunctions
Else
'.
End if
'et ainsi de suite
End sub
Maintenant s'il y a beaucoup de checkbox et si la combinaison de plusieurs checkbox est possible, ç'est un peu plus compliqué.
Dans ces cas là, j'utilise la technique des drapeaux (flags pour les informaticiens). C'est un nombre vu en format binaire ("10010" par exemple) qui prend une certaine valeur en fonction du positionnement des bits ( 1 ou 0) et donc déclencher telle ou telle opération.
Il y a plus simple si les combinaisons possibles sont limitées avec des If Then Else End If imbriqués ou avec le sélectionneur Select Case End Select.
Ammuse toi bien.
Sur la userform , tu place un commandButton "OK" par exemple, qui va fermer la userform et va tester les checkbox une à une.
Ca peut ressembler à ça si un seul choix declenche une ou plusieurs actions:
sub CommandButton1_click()
userform1.hide 'on ferme le formulaire
If checkbox1.value=true then
'instrunctions
'.
Else
'.
End if
If checkbox2.value=true then
'instrunctions
Else
'.
End if
'et ainsi de suite
End sub
Maintenant s'il y a beaucoup de checkbox et si la combinaison de plusieurs checkbox est possible, ç'est un peu plus compliqué.
Dans ces cas là, j'utilise la technique des drapeaux (flags pour les informaticiens). C'est un nombre vu en format binaire ("10010" par exemple) qui prend une certaine valeur en fonction du positionnement des bits ( 1 ou 0) et donc déclencher telle ou telle opération.
Il y a plus simple si les combinaisons possibles sont limitées avec des If Then Else End If imbriqués ou avec le sélectionneur Select Case End Select.
Ammuse toi bien.
Vous n’avez pas trouvé la réponse que vous recherchez ?
Posez votre question