Worksheet functions in VB

C

Costas

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"))
 
B

Bob Phillips

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)
 
C

Costas

I have two sheets in the first sheet in the column A
contains accounts name and in the column B figures.
The second sheet contain the same thinks but is updated
from the first sheet. The sumIf Function in VB as I
mentioned below is working just for one cell. My question
is if it is possible to apply the same function to the
rest cell but of course the result will be different and
spread to the remainder cells.
 
T

Tom Ogilvy

Set Myrange = Sheet2.Range("a10:a100")
for each cell in Sheet1.Range("B10:B100")
Sheet1.cells(cell.row,"F").Value = _
Application.WorksheetFunction.SumIf(Myrange, _
cell.Value, Sheet2.Range("C10:C100"))
Next
 
Top