S.total d'une colonne à cellule variable

Bonjour,

J’ai créé une petite macro pour effectuer un sous-total dans la cellule Q1,

Le problème est que le tableau à un nombre de lignes qui varie selon l’extraction du Business Object.

Range("Q1").FormulaLocal = "=SOUS.TOTAL(2;N2:N41699)"

si l'extraction dépasse les 41699 lignes, les résultats seront erronées.

Merci de me donner un code qui prend en compte le changement de nombre des lignes.

Bonsoir,

Une proposition, en supposant qu'il n'y ait pas de ligne vide :

Dim a As Long
a = Range("N2").End(xlDown).Row
Range("Q1").FormulaLocal = "=SOUS.TOTAL(2;N2:N" & a & ")"

Merci beaucoup, la macro marche à merveille