將表格函數 SUMIF(A:A,">5",B:B) 改用VBA代碼如下:
Application.WorksheetFunction.SumIf(Range("A:A"), ">5", Range("B:B"))
(.WorksheetFunction可省略)