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