WorksheetFunction.Subtotal (Excel)
Cria subtotais.
Subtotal (Arg1, Arg2, ..., Arg30)
Dim dblArg1 As Double: dblArg1 =
Dim dblSubtotal As Double
dblSubtotal = WorksheetFunction.Subtotal(Arg1:=dblArg1, Arg2:=)
Arguments
Arg1, Arg2, ..., Arg30Arg1 (Double) - Um número indicando a função de agregação a ser usada pelo método.
Arg2 (Range) - O primeiro objeto Range para o qual um subtotal deve ser calculado.