Autosum Macro

[RevZ]

Hi All,

I have a report that I pull from Sage into Excel, however it creates Subtotals for each of the Suppliers invoices.

As you can imagine there's quite a few suppliers on the list and the totals from the report don't contain an autosum amount, just the text amount from the report.

Is there an easy way in which I can make a macro that will create the autosum for each of the subtotals so if I manipulate the data and delete rows, it generates the correct subtotal?

Thanks,
RevZ

 

[cmowla]

I am sure there is a way to do what you want. I'm just not sure what it is exactly you want.

You can create a macro which functions the same as AutoSum.

Sub Test__Sum_All_Values_In_This_Range()
MsgBox Sum_All_Values_In_This_Range(ActiveSheet.name, "A1:A30")
End Sub
Function Sum_All_Values_In_This_Range(sheetName As String, rangeAddress As String)
Sum_All_Values_In_This_Range = Application.Sum(Sheets(sheetName).Range(rangeAddress))
End Function

Or you can have a macro write an autosum formula for you. (Which is kind of redundant, as that's very easy to do yourself.)

 

[Peter_SSs]

Welcome to the MrExcel board!

Can you post a small section of your worksheet (any sensitive data disguised) that shows the layout of the data and where these 'fixed' subtotals are (with XL2BB)?