Formula works in Excel but not VB

Hello,

can someone help me work out a formula which will work in VB please..

Excel formula is

=SUMPRODUCT(--(A1:A1000="DA"),--(B1:B1000="A000"),D1:D1000)

Which is basically Sum all the values in range D1:D1000 if the cell in column A = "DA" and cell in column B = "A000".

Formula works fine in the spreadsheet but cannot get the equivalent formula to work in VB. Here is my effort (Which returns the error "Type Mismatch")

Please Login or Register  to view this content.

Any help would be greatly appreciated.

John