A few more details would help. Surely you don't want every cell to have
this result?

--

HTH

Bob Phillips
... looking out across Poole Harbour to the Purbecks
(remove nothere from the email address if mailing direct)

"Costas" wrote in message
...
I use a worksheet function in VB and specificly the sum
if. This is working properly but only for one cell what
is the easy way to do for a lot of cells.

Set Myrange = Sheet2.Range("a10:a100")
Sheet1.Range("f10") = _
Application.WorksheetFunction.SumIf((Myrange) _
, Sheet1.Range("b10"), Sheet2.Range("C10:C100"))