Fonction Subtotal : placer une variable dans le paramètre TotalList

Fonction Subtotal : placer une variable dans le paramètre TotalList - VB/VBA/VBS - Programmation

Marsh Posté le 09-03-2006 à 11:44:00    

Voili voila.
 
Je souhaite effectuer un sous-total grâce à une Macro dans Excel.
 
J'utilise donc la fonction Selection.subtotal.
 
Marche très bien sauf que pour choisir les colonnes sur lesquelles il faut effectuer une opération (une somme dans mon cas), il faut saisir un tableau.
 
Un peu dans ce style :
 

Code :
  1. Selection.Subtotal GroupBy:=2, Function:=xlSum, TotalList:=Array(3, 4, 5), Replace:=True, PageBreaks:=False, SummaryBelowData:=True


 
Donc en gros, le paramètre TotalList contient un tableau qui définit les colonnes sur lesquelles seront appliquées mes sommes lors du regroupement.
 
Très bien, sauf que mon nombre de colonnes est variable.
 
Alors je me dis : super, bah je vais me faire un ptit tableau d'avance...et je le met en guise de paramètre.
 
Ca donne un truc du style :
 

Code :
  1. Selection.Subtotal GroupBy:=2, Function:=xlSum, TotalList:=TotalArr, Replace:=True, PageBreaks:=False, SummaryBelowData:=True


 
Oui....sauf que ça fait planter la macro....il ne veut pas de ça....
 
Quelqu'un à une soluce ?
 
Merci !

Reply

Marsh Posté le 09-03-2006 à 11:44:00   

Reply

Marsh Posté le 05-12-2007 à 19:48:05    

porecreat a écrit :

Voili voila.
 
Je souhaite effectuer un sous-total grâce à une Macro dans Excel.
 
J'utilise donc la fonction Selection.subtotal.
 
Marche très bien sauf que pour choisir les colonnes sur lesquelles il faut effectuer une opération (une somme dans mon cas), il faut saisir un tableau.
 
Un peu dans ce style :
 

Code :
  1. Selection.Subtotal GroupBy:=2, Function:=xlSum, TotalList:=Array(3, 4, 5), Replace:=True, PageBreaks:=False, SummaryBelowData:=True


 
Donc en gros, le paramètre TotalList contient un tableau qui définit les colonnes sur lesquelles seront appliquées mes sommes lors du regroupement.
 
Très bien, sauf que mon nombre de colonnes est variable.
 
Alors je me dis : super, bah je vais me faire un ptit tableau d'avance...et je le met en guise de paramètre.
 
Ca donne un truc du style :
 

Code :
  1. Selection.Subtotal GroupBy:=2, Function:=xlSum, TotalList:=TotalArr, Replace:=True, PageBreaks:=False, SummaryBelowData:=True


 
Oui....sauf que ça fait planter la macro....il ne veut pas de ça....
 
Quelqu'un à une soluce ?
 
Merci !


 
Bonjour,
J'ai le même problème ! As-tu trouvé la solution ?
Merci
Alain


---------------
Alain
Reply

Marsh Posté le 06-12-2007 à 11:07:53    

1 an et demi après, on va peut-être enfin connaître le numéro et le libellé de l'erreur qui interrompt la macro... ?

Reply

Marsh Posté le 07-12-2007 à 05:10:17    

Une réponse à qqch de similaire mais ... sur un autre forum
http://www.excel-downloads.com:80/ [...] forme.html

Reply

Sujets relatifs:

Leave a Replay

Make sure you enter the(*)required information where indicate.HTML code is not allowed