msgbox activesheet.evaluate _
("SUMPRODUCT((I341:I352="" International "")" & _
"*(H341:H352="" Shipper ""),(T341:T352))")



Rafi wrote:

I would like to implemet the follwoing formula in VBA and would appreciate
any help

The intent is to summ the values in the range T341:T352 for those rows where
the value in colum I is International and the value in column H is Shipper

SUMPRODUCT((I341:I352=" International ")*(H341:H352=" Shipper "),(T341:T352))

Thanks

--

Dave Peterson