Sum a Range of Cells

B

Bob Phillips

myVar = Application.Sum(Activecell.CurrentRegion)

--
HTH

Bob

(there's no email, no snail mail, but somewhere should be gmail in my addy)
 
Top