convert to application.worksheetfunction.sumproduct

Question

can someone convert this formula SUMPRODUCT(--(A:A>B:B))?

A:A and B:B are worksheet

this must count the number of cells less than in column b

application.worksheetfunction.sumproduct

Thanks!

Answer 1

Use Evaluate()

Sub lexation()
    Dim v As Variant
    v = Evaluate("SUMPRODUCT(--(A:A>B:B))")
    MsgBox v
End Sub

For example: