Additionner des sommes cochées

Bonjour à tous.

Je souhaiterais, à partir d'une colonne de nombres, faire l'addition de ceux qui sont cochés. Pour cela je souhaite insérer un bouton (je ne sais pas la nature qu'il faut). en face de chaque nombre.

En cliquant sur le bouton des différents nombres, une somme se crée pour ces seuls nombres.

J'ai fait un petit fichier pour la compréhension de ma question.

Je suis sur Excel 2007 et sur PC.

Est-ce possible ?

Ce serait vraiment gentil à vous de me dépanner.

Merci d'avance et bonne journée à vous tous.

Bonjour,

contente-toi d'un x dans la cellule et :

=SOMME.SI(C6:C9;"x";B6:B9)

D'une part plus simple et rapide à créer, d'autre part trop d'objets sur une feuille et excel se met à merdouiller (trop pouvant être 10 pour lui...)

eric

Bonjour le forum,

=SOMMEPROD((D6:D9=VRAI)*(B6:B9))

Vous êtes tous les deux formidables.

Merci j'ai deux solutions qui m'aident et m'ouvrent d'autres voies.

Encore merci et bonne journée.

PS : le x peut être mis par une petite macro sur un double-clic si tu n'as pas envie de lâcher la souris pour le clavier.

Ca s'approche du même fonctionnement qu'une case à cocher.

Tu peux même mettre une belle coche verte d'une des polices wingdings.

Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
    If Not Intersect(Target, [C6:C9]) Is Nothing Then
        Cancel = True
        Target = IIf(Target = "", "x", "")
    End If
End Sub

eric

Ah oui c'est super cette solution. Je vais m'y affairer.

Merci d'avoir pris le temps de me répondre et bonne journée.

Rrrrrr ! encore moi.

Je sais allier une macro à un bouton, mais pas à une cellule, ou à une sélection de cellule par exemple une partie de colonne.

Si c'est compliqué, dans quelle partie du cours puis-je trouver ma réponse ?

Merci

Bonjour,

si c'est en lien avec ce que je te proposais il suffit de coller le code dans le module de la feuille concernée.

Sinon ta question est trop vague pour être comprise.

eric

Bonjour,

si j'ai compris la question:

If Not Intersect(Target, [C6:C9]) Is Nothing Then

c'est donc cette plage de C6:C9 cellule qui permet la macro

P.

Oui Paul c'était bien ma question. Je n'avais pas vu la sélection qu'avait fait Eriic sur C6-C9

Merci Eriic. en fait je l'avais mis dans le module 1 mais pas dans la feuille choisie. Ceci doit expliquer cela.

Je suis content d'être entouré d'autant de compétences.

Merci encore

Pardon Merci Patrick1979 et non Paul. Toutes mes excuses

Merci Patrick1957. J'y arrive