how get value of status bar sum?

[Guest]

Thanks for all help.
I need to put the value of the status bar sum into a variable. How do I
access the status bar sum value?
Someone said use Dsum=application.sum(selection), but I need the value in
the status bar, not what is selected (I am using autofilter).
Thanks.

 

[Norman Jones]

Hi Ian,

Try:

Sub Tester03()
Dim dSum As Double

dSum = Application.Sum( _
Selection.SpecialCells(xlVisible))

MsgBox dSum

End Sub

 

[Bob Phillips]

But the sum in the status bar will be what is selected!

--

HTH

RP
(remove nothere from the email address if mailing direct)