Hi,
To sum a1:n1 of the active sheet:
Dim v as Variant
v = application.WorksheetFunction.Sum(range("A1:N1"))
Then you can place it in another cell: Range("A2") = v

Regards,
Sebastienm

"CG Rosén" wrote:

Hi Group,

Sorry for a probably simpel question.
What code to use for adding the values of
cells A1 to N1 in VBA, without using the FormulaR1C1 method?

Brgds

CG Rosén