NEW ARTICLE
Railsのエラー『Devise::OmniauthCallbacksController#failure』の解決方法
  1. HOME
  2. vba
  3. VBA わざとエラーを発生させる

VBA わざとエラーを発生させる

  • 作成日 2022.03.19
  • vba
VBA わざとエラーを発生させる

VBAで、わざとエラーを発生させるコードを記述してます。

目次

環境

  • OS windows10 64bit

わざとエラーを発生

エラーを発生させるには、「Err.Raise エラーNo」を使用します。

実際に適当なボタンを用意して、「Err.Raise」でエラーを発生させる
以下のソースコードを記述します。

ソースコード

Option Explicit

Private Sub CommandButton1_Click()

On Error GoTo EXCEPTION_SECTION

' エラーNo 1を発生させる
Err.Raise 1

EXCEPTION_SECTION:

    With Err

        MsgBox (.Description), vbOKOnly + vbExclamation + vbSystemModal

    End With

    GoTo EXIT_SECTION

EXIT_SECTION:

End Sub

エラーが発生することが確認できます。