MsgBox Application.Subtotal(9, subtotalrange)
or
MsgBox Application.Subtotal(9, range("a2:a200"))
--

Don Guillett
SalesAid Software

"Tom S" wrote in message
...
Win XP Pro
Excel 2002

I'm trying to figure out a way to envoke subtotalling with VBA. I would
have to set all of the parameters of the subtotal feature in VBA, with no
human interaction. Can this be done? And if so, how?
Thanks

Tom S.