Bonjour

Je travaille présentement sur un classeur excel dont les données proviennent d'une table Access. J'exporte donc mes données brutes à partir d'Access et à l'aide d'une macro dans excel, je fais la mise en page des données.

Je souhaite donc faire des sous-totaux sur 10 colonnes. Sur 9 d'entre elles je dois faire des sommes et sur 1, une moyenne.

J'utilise donc le code suivant:


Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
 
Worksheets("Marges").Range("Data").Subtotal 2, xlSum, Array(10, 11, 12, 14, 17, 18, 19, 27)
Worksheets("Marges").Range("Data").Subtotal 2, xlAverage, Array(16)

Mon problème est que j'ai le résultat sur 2 lignes pour chaque sous-total, 1 pour la somme et 1 pour la moyenne.

Existe-t-il un moyen de tout ramener sur une seule ligne?

Merci pour votre aide