Hi Markus!

I tried that without success. Thanks anyway.

Stef

"Markus Scheible" wrote:

Hi Stef,


.Cells(3, i).Value = "=Sum(Range(sName & !
sumPremiums))"

It is the third .Cells-argument that causes my problem.



Try .cells(3,i).Formula instead of .Value...

Best

Markus