I'm believe the SUBTOTAL worksheet function will meet your needs. At the
bottom of the column that has the autofilter enter the formula
=SUBTOTAL(9,A1:A10). This is assuming your list is in cells A1-A10. Also,
ensure that you place this formula in a cell that is NOT in A1-A10 AND not
included in the autofilter list. The result should be the sum of whatever is
currently visible in the autofilter list.

"Jason Kendall" wrote:

My user has a spreadsheet with some columns of dollar values.
What he wants to do is to set up an Auto Filter on the data with a Sum
cell at the bottom of the column (or even elsewhere on the page) such
that the sum will adjust to show only the sum of those values that are
visible in the originally selected range, which includes all of the
cells in that column, for the data set.

I'm not an Excel programmer so I don't know the VBA object model. I
have read all of the newsgroup posts back to 05/15/05 that have the
word 'sum' in the subject and I've seen a lot of things that look like
they might be the answer, but I can't seem to crack this nut.

I know this CAN'T be hard and I actually expect that there's already
an Excel function to do this, but I just can't find it.

My very closest attempt is this one line function shown below, which
doesn't seem to work.

Public Function SumVisibleRows(ByVal TheRange As Range) As Currency
SumVisibleRows =
CCur(Application.Sum(TheRange.SpecialCells(xlCellT ypeVisible)))
End Function

Thanks for any help!


-Jason Kendall