Excel UDF來計算錯誤

Question

我正試圖在Excel VBA中編寫一個UDF來計算錯誤（#NA！，#REF！...）。 我試圖將Excel公式轉換爲VBA語言中的bud沒有成功。 有人知道解決方案嗎？

感謝

Answer 1

如何

Public Function CountErr(cells As range) As Long 
    Dim cell As range 
    For Each cell In cells 
     If Application.WorksheetFunction.IsError(cell) Then CountErr = CountErr + 1 
    Next 
End Function