Boutons à cocher excel 2007

damsfive Messages postés 1 Date d'inscription mardi 13 avril 2010 Statut Membre Dernière intervention 14 avril 2010 - 14 avril 2010 à 14:29
jordane45 Messages postés 38154 Date d'inscription mercredi 22 octobre 2003 Statut Modérateur Dernière intervention 4 mai 2024 - 14 avril 2010 à 18:30
Bonjour,
Je suis novice en "programmation" mais j'ai une chose surement toute simple à faire sur excel 2007, mais ne maitrisant pas les macros, je suis totalement bloqué.
Je voudrais rendre des cellules (avec une valeur)actives ou non dans une somme de quatre cellules grace à un bouton à cocher. En clair, Si une cellule est cochée, elle est prise en compte dans la somme, si non cochée, elle n'est pas prise en compte.

Merci d'avance.

1 réponse

jordane45 Messages postés 38154 Date d'inscription mercredi 22 octobre 2003 Statut Modérateur Dernière intervention 4 mai 2024 344
14 avril 2010 à 18:30
Bonjour,
voici (vite fait) un exemple de comment tu pourrais procéder.

Sub som_chk()

Dim MaSomme
Dim val_chB() ' Je déclare un tableau virtuel
ReDim val_chB(4) 'fixe la taille à 4
'J'ajoute les valeurs de mes CheckBox dans ce tableau
val_chB(1) = Sheets(1).CheckBox1.Value
val_chB(2) = Sheets(1).CheckBox2.Value
val_chB(3) = Sheets(1).CheckBox3.Value
val_chB(4) = Sheets(1).CheckBox4.Value

For x = 1 To 4 'boucle pour parcourir mon tableau
    If val_chB(x) = True Then ' test si coché..
       MaSomme = MaSomme + Cells(x, "A").Value             'calcule la somme
    End If
Next
End Sub



En gros, pour tester si une case à cocher (CheckBox ) est cochée.. il faut utiliser l'instruction :
Sheets(1).CheckBox1.Value 

Qui retourne True ou False.

Si il y a des questions, n'hésites pas à me recontacter.

Cordialement,
Jordane,
0
Rejoignez-nous