additionner une cellule sur 2

[luc]

Bonsoir à tous,
Comment, dans une ligne, additionner une cellule sur deux ? La formule suivante trouvée pour exemple sur le forum ne marche pas :
=SOMME(SI(MOD(COLONNE(A4:E4)-1;2)=0;A4:E4;0))

Merci de votre aide

 

[Monique]

Bonjour,

La formule que tu donnes est à valider par ctrl, maj et entrée.

SommeProd(), à valider de façon classique.
Colonnes paires :
=SOMMEPROD((MOD(COLONNE(A4:E4);2)=0)*A4:E4)
Colonnes impaires :
=SOMMEPROD((MOD(COLONNE(A4:E4);2)=1)*A4:E4)
ou bien :
=SOMMEPROD((MOD(COLONNE(A4:E4);2))*A4:E4)

Somme(Si()), formule matricielle, à valider par ctrl, maj et entrée.
Colonnes paires :
=SOMME(SI(MOD(COLONNE(A4:E4);2)=0;A4:E4))
Colonnes impaires :
=SOMME(SI(MOD(COLONNE(A4:E4);2)=1;A4:E4))
ou bien :
=SOMME(SI(MOD(COLONNE(A4:E4);2);A4:E4))

 

[CHti160]

Salut "luc"
en VBA une petite procèdure qui fait la somme d'une case sur deux sur une
plage delimitée
peut peut-être être adaptée pour faire mieux Lol !!!!!
Sub calcull()
Dim cel As Range
Dim result As Integer
Dim somme As Integer
Dim C As Byte

For C = 2 To 15 Step 2 'limite des colonnes
Cells(7, C).Select
somme = Selection.Value
result = result + somme
somme = 0
Next C
Range("G4") = result 'affiche le résultat en cellule G4
Range("G3").Select
End Sub
A++
Jean Marie

 

[CHti160]

Oups "Monique"
pas frais comme on dit enfin "raffraichi"
Bonsoir à toi "Monique"
bonne nuit
A+++
Jean Marie

 

[luc]

Grand merci à Monique et à Chti160, les deux solutions marchent très fort, mais j'ai une petite préférence pour Monique...j'ai une question supplémentaire : ...et avec les oreilles, vous savez rien faire ?

 

[Monique]

Bonsoir,

Si, je sais remuer mes oreilles. (la droite mieux que la gauche)