Calculer le nombre de Checkbox cochés dans un userform

Paf

XLDnaute Barbatruc

• 1 Février 2014

• #2

Re : Calculer le nombre de Checkbox cochés dans un userform

bonjour

sans plus de précision, ce code à inscrire dans Private Sub CheckBox1_Click()

Code:

If CheckBox1 Then
    TextBox20.Value = Val(TextBox20.Value) + 1
Else
    TextBox20.Value = Val(TextBox20.Value) - 1
End If

à répéter pour chaque CheckBox, et adapter le nom de la TextBox

A+

 

Vote positif 0 Vote négatif

Robert

XLDnaute Barbatruc

Repose en paix

• 1 Février 2014

• #3

Re : Calculer le nombre de Checkbox cochés dans un userform

Bonjour Ashiles, bonjour le forum

À chaque Checkbox tu ajoutes la ligne ci-dessous :

Code:

Call Comptage

puis tu insère une procédure (toujours dans la page de code de l'UserForm) :

Code:

Public Sub Comptage()
Dim c As Integer
Dim cb As Control

c = 0
With UserForm1
    For Each cb In .Controls
        If TypeOf cb Is MSForms.CheckBox And cb.Value = True Then c = c + 1: .TextBox1.Value = c
    Next cb
End With
End Sub

D'habitude je commente les codes et je joins un fichier exemple mais là j'ai fait comme toi, j'ai eu la flemme...

[Édition]
Bonjour Paf, on s'est croisé...

 

Vote positif 0 Vote négatif

A

ashiles

XLDnaute Nouveau

• 1 Février 2014

• #4

Re : Calculer le nombre de Checkbox cochés dans un userform

Bonjour Robert
Merci pour ta réponse; mis call comptage dans chaque checkbox_change(), puis le code dans la page du userform, cela me met un message d'erreur : erreur d'exécution 438 propriété ou méthode non géré par cet objet

 

Vote positif 0 Vote négatif

A

ashiles

XLDnaute Nouveau

• 1 Février 2014

• #5

Re : Calculer le nombre de Checkbox cochés dans un userform

Merci Paf pour ta réponse
@+++

 

Vote positif 0 Vote négatif

Robert

XLDnaute Barbatruc

Repose en paix

• 1 Février 2014

• #6

Re : Calculer le nombre de Checkbox cochés dans un userform

Bonsjour le fil, bonjour le forum,

Ha bon Ashiles...

 

Pièces jointes

• Ashiles.xlsm

  19.7 KB · Affichages: 117

Vote positif 0 Vote négatif

A

ashiles

XLDnaute Nouveau

• 1 Février 2014

• #7

Re : Calculer le nombre de Checkbox cochés dans un userform

re Robert;
j'ai omis de mettre c=0 dans l'USF initialize
Merci Beaucoup that's done!!😉

 

Vote positif 0 Vote négatif