I am looking to subtotal multiple columns some with Sum, others with Average. I am using the following code, but, it is not working, it replaces the sums with the Averages, and I cannot get everything to display properly.
Sub Subtotal()
Selection.Subtotal GroupBy:=1, Function:=xlSum...