[VBA-E] Sous-totaux multiples

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:

---

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

Ne peux-tu pas scinder ta formule, les sommes sur les 9 premières et la moyenne sur la colonne suivante ?
Juste une idée comme ça, je n'ai pas approfondi

Je ne suis pas certaine de bien comprendre ta réponse. Parce que c'est bien ce que je fais, j'ai une formule pour la somme sur mes 9 colonnes et une autre ligne avec la formule pour la moyenne sur la 10ième colonne... mais le problème c'est qu'à l'affichage, j'ai 2 lignes de sous-total.

Citation:

---

Je ne suis pas certaine de bien comprendre ta réponse

---

Autant pour moi, je n'avais lu qu'une ligne et m'étais concentré de ta question, par sur le code. (j'ai fait en sorte que tout ton code soit apparent ;) )
Ceci dit, avec subtotal tu as le paramètre xlSummaryRow dans "SummaryBelowData"

Citation:

---

Envoyé par L'aide

xlSummaryAbove ou xlSummaryBelow. La valeur par défaut est xlSummaryBelow.

---

Jète un oeil à l'aide sur subtotal et fais l'essai (pas testé)

A+

xlSummaryAbove ne fait qu'afficher la ligne de sous-totaux au-dessus des données et non en dessous.

Je voudrais plutôt pouvoir simplement regrouper ces 2 sous-totaux en 1 seule ligne.

Est-ce que ça te crée une nouvelle ligne ne contenant que le sous-total ? Il me semble que oui
Dans ce cas, copie ta valeur dans la bonne ligne, au bon endroit et supprime la ligne en trop
A tout hasard :(

Ok, c'est une bonne solution par contre je dois automatiser cette tâche puisque j'en ai énormément... Alors y a-t-il un moyen de détecter automatiquement les lignes de sous-totaux???

Merci

Celles qui ont toutes les cellules de la ligne vide sauf une... Juste une idée, ne connaissant pas ta base de données, ou par les formules que contiennent les cellules de la colonne (les sous-totaux contenant toujours la même structure
Pas d'autre idée :(