Discussion :

[Zebulon777]

Salut à tous,
je galère et, bien sur, c'est urgent...

Il faut que je fasse la somme en ligne et en colonne d'une feuille, sachant que je ne connais ni le nombre de lignes, ni le nombre de colonnes.
J'avais pensé faire des boucles, mais je pense qu'il existe un moyen plus simple.

Merci d'avance.

[ouskel'n'or]

Essaie de le faire en enregistrant la macro. Les fonctions Excel permettent de le faire et utilise la plage de données, pas les lignes vides.
Si tu as un pb pour pérenniser le code, tu reviens nous voir
A+ (!)

[ouskel'n'or]

En considérant que tu as une ligne d'en-tête, que tes données commencent sur la ligne 2, que tu n'as pas de ligne ni de colonne entièrement vide dans ta plage de données, tu peux utiliser ceci

Code :

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

1
2
3
4
5
6
7
8
9
10
11
Dim NbLignes As Long, DerCol As Integer
    NbLignes = Range("A1").CurrentRegion.Rows.Count 'la dernière ligne d'une plage sans trou
    DerCol = Range("A1").CurrentRegion.Columns.Count 'la dernière colonne
 
    For i = 1 To NbLignes
        Cells(i, DerCol + 1).Formula = "=Sum(" & Range(Cells(i, 1), Cells(i, DerCol)).Address & ")"
    Next
 
    For i = 1 To DerCol
        Cells(NbLignes + 1, i).Formula = "=Sum(" & Range(Cells(2, i), Cells(NbLignes, i)).Address & ")"
    Next

Si tu as des lignes ou des colonnes vides, jète un oeil là pour déterminer les dernière ligne et dernière colonne, de ta plage de données à additionner, qui te conviennent le mieux
A+

[Zebulon777]

Merci, merci et merci....