Discussion :

[repié]

Bonjour

Je souhaite additionner deux ensembles de 8 lignes (tailles identiques).
Malheureusement, lorsque que je reprend la fonction de « collage spécial » ne fait que ajouter « + la valeur de la cellule » à dans la cellule de destination
Mais étant donné que les aditions que je besoin de faire se comptent par plusieurs dizaines, je voudrai éviter les formules à rallonges
Existe-t-il une possibilité de faire simplement additionner les valeurs des lignes ?
Merci

[zazaraignée]

Salut

Tu peux toujours faire la somme des deux sommes.

[repié]

qu'est ce que tu apelle

Somme des deux sommes

?
En fait,je veux simplement préciser en plus que chaque ligne s'additionne avec son homologue.

[random]

collage spécial addidtion VALEUR

[repié]

En fait c'est ca que je souhaite éviter!
Le collage spécial me donne des formules de ce type!

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

=(((((1+2)+3)+5)+99)+5)

Mais comme j'ai 200 valeurs à additionner, ca me fait des formules énormes donc je cherche justement un substitut, peut être une fonction dans les macros

[leroissejp]

Bonsoir,
Si celà peut t'aider, ce code additionne les cellules A1 à A8 et place le résultat en A9.

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
 
Sub Additionner()
Dim plageTest, cel, total
plageTest = "A1:A8"
For Each cel In Range(plageTest)
    If cel.Value <> 0 Then
        total = total + cel.Value
    End If
Next cel
Range("A9").Value = total
End Sub

jpleroisse

[zazaraignée]

Salut

Utilises-tu les formules de cellules? Si oui, enregistre une macro.

Tu connais la fonction Somme (Symbole sigma majuscule dans la barre d'outils)? Tu fais la somme d'une ligne, puis d'une autre et ainsi de suite et à la fin, tu fais la somme des sommes.