myVar = Application.SUM(Activecell.Resize(,10))

--
HTH

Bob Phillips

(remove nothere from email address if mailing direct)

"Ashnook" <brian@atashnookcdtfreeservedotcodotuk wrote in message
. com...

From VB code I want to write a formula into the selected cell that will
add up the 10 cells to the right of the selected cell. I do not know the
location of the selected cell so I want some form of relative sum()
formula.

ie =sum('from here', +1, +10) along the row.

I bet it is very simple but I cannot find anything in the help. All the
ones I can find expect you to know where you are starting from!

Thanks
Brian