Home > 即効テクニック > Excel VBA > 関数関連のテクニック > ユーザー定義関数でエラーを表示する

即効テクニック
関数関連のテクニック

ユーザー定義関数でエラーを表示する

( - )
● 概要 ●

CVErr関数を利用すると、ユーザー定義関数をワークシートから呼び出した際に、関数の引数に適切な値が設定されなかった場合にエラーを表示させることができます。

　構文 CVErr(Expression)

　設定項目　　　　内容
　Expression　　　エラー番号を指定。XlCVError列挙型を指定することも可能


エラー番号とXlCVError列挙型、そしてセルに表示されるエラーは次のようになりま
す。

XlCVError列挙型のメンバ　値　　　セルに表示されるエラー
xlErrNull　　　　　　　　2000　　#NULL!
xlErrDiv0　　　　　　　　2007　　#DIV/0
xlErrValue　　　　　　　 2015　　#VALUE!
xlErrRef　　　　　　　　 2023　　#REF!
xlErrName　　　　　　　　2029　　#NAME?
xlErrNum　　　　　　　　 2036　　#NUM!
xlErrNA　　　　　　　　　2042　　#N/A


次のサンプルは、第1引数の値を第2引数の値で除算するユーザー定義関数です。第2引数に「0」が指定された場合、CVErr関数を利用して、0除算によるエラー(#DIV/0）をセルに表示します。


● サンプル ●
Function Sample(BaseNumber As Long, DivNumber As Long) As Variant
    If DivNumber <> 0 Then
        Sample = BaseNumber / DivNumber
    Else
        Sample = CVErr(xlErrDiv0)
    End If
End Function