List subtotals
 

Hi

I'm using the following code to generate subtotals from a list
is there anyway I can find the cell reference (R1C1) of each
generated subtotal

Columns("K:L").Select
Selection.Subtotal GroupBy:=1, Function:=xlSum,
TotalList:=Array(2), Replace:=True, PageBreaks:=False,
SummaryBelowData:=True


any ides please

Many thanks