sous totaux en VBA

Question

Bonjour - bonsoir &#224; tous

Comment ecrire la syntaxe en VBA pour cr&#233;er des sous totaux?

Cette syntaxe que j'ai &#233;cris ne fonctionne pas.

'Worksheets("Releve d'Heures").Activate
'Range("B5:K73").Select


'Application.WorksheetFunction.Subtotal Groupby:=7, Function:=xlSum, totallist:=Array(10, 11), _
        Replace:=False, PageBreaks:=False, SummaryBelowData:=True

message erreur "argument nomm&#233; introuvable"

Si j'enregistre une macro en cr&#233;ant des sous totaux et que je veux la r&#233;utilis&#233;e cela ne marche pas non plus.

Qui connait la'astuce??

mer&#231;i

 Phil

cs_BimBam · Answer

Chez moi ce code fonctionne correctement:

Selection.Subtotal GroupBy:=2, Function:=xlSum, TotalList:=Array(8, 9, 10, _
        11, 12, 13, 14, 15, 16, 17, 18), Replace:=False, PageBreaks:=False, SummaryBelowData _
        :=True

Peut etre est ce ton "Groupby = 7" ???



Est ce que tes champs 10 et 11 (totalList=Array(10,11)) sont bien Numeriques ?


Ben Harper is our Messiah

Sous totaux en VBA

1 réponse

Discussions similaires