ExcelマクロVBA入門
第62回.「On Error Resume Next」とErrオブジェクト

Excelマクロの基礎と応用、エクセルVBAの入門・初級・初心者向け解説
最終更新日:2019-07-12

第62回.「On Error Resume Next」とErrオブジェクト


「On Error Resume Next」ステートメントは、
実行時エラーが発生してもマクロVBAを中断せずに、エラーが発生したステートメントの次のステートメントから実行を継続します。


マクロVBAは、エラーが発生するとその時点で停止してしまいます。

マクろVBA on error Go To

VBAが実行不能となった場合に、エラー発生したVBAコードで停止します。
このような状態になるエラー発生時にも、マクロVBAが停止せずに次のVBAコードに進んでほしい時には、
On Error Resume Next ステートメントを使用します。

On Error Resume Next

エラーが発生しても、エラーが発生したステートメントの次のステートメントから実行を継続します。
このステートメント以降、On Error GoTo 0 が無い限り、プロシージャーの終わりまで有効となります。

On Errorの有効範囲については、前回の「On Error Go To」と「Exit Sub」
「OnErrorGoTo行ラベル」このステートメントは、実行時エラーが発生した時に、制御を指定の行ラベルに移動させるものです。マクロVBAは、エラーが発生するとその時点で停止してしまいます。VBAが実行不能となった場合に、エラー発生したVBAコードで停止します。
こちらを参照してください。

オブジェクトを操作する場合は、
On Error GoTo ステートメントではなく、このステートメントを使うようにします。

On Error Resume Next によって、エラーが発生しても、停止することなく次のステートメントへ進みます。
しかし、エラーが発生している訳ですから、
エラーに対する何らかの処理が必要になります。
そこで、エラー発生しているかを判定する必要が出てきます。
エラー発生の情報は、Errオブジェクトに入っています。

Errオブジェクト

Err オブジェクトは、実行時エラーに関する情報を保有しています。
Errオブジェクトのプロパティとメソッド

Err.Clear すべてのプロパティの設定値をクリア
Err.Description エラーに関する簡単な説明
Err.HelpContext ヘルプ ファイルのトピックに対応するコンテキスト番号
Err.HelpFile ヘルプ ファイルへの絶対バス
Err.LastDllError 最後にダイナミック リンク ライブラリ (DLL) を呼び出したときのエラー コード
Err.Number エラーを指定する数値。エラーではない場合は0
Err.Source エラーの発生元のオブジェクトまたはアプリケーションの名前

Errオブジェクトは、プロジェクト内で一つしか存在しません。
従って、エラーの情報を複数保持しておくことはできません。


On Error Resume Next の使用例

Dim i As Long
On Error Resume Next
i = "ABC"
If Err.Number <> 0 Then
  MsgBox Err.Description
  Err.Clear
End If
MsgBox Err.Number

この場合、メッセージボックスには、
「型が一致しません」と表示されます。
Err.Clearでエラー情報をクリアしています。
クリアしないと、エラー情報はそのまま残っています。
次のエラーが発生したことを判断できるように、エラー処理の後でクリアするようにします。
Err.Clearを実行すると、Errオブジェクトがクリアされエラー情報は消去されます。
従って、最後のメッセージ表示は「0」となります。

最後に

エラー処理はマクロVBAにおいて極めて重要です。
もちろん、エラー発生しないようにVBAを書くべきではありますが、
エクセルVBAでは、避けようのないエラー(でしか判定できないような場合)も存在します。
エラー処理を正しく行えるかどうかは、VBAスキルの判断になるとも言えます。
前回のOn Error Go Toと合わせてしっかりと習得してください。
第61回.「On Error Go To」と「Exit Sub」
「OnErrorGoTo行ラベル」このステートメントは、実行時エラーが発生した時に、制御を指定の行ラベルに移動させるものです。マクロVBAは、エラーが発生するとその時点で停止してしまいます。VBAが実行不能となった場合に、エラー発生したVBAコードで停止します。

実行時エラーに関する記事
実行時にトラップ可能なエラー番号一覧と対処
VBA実行時に発生するエラーのうち以下の表にあるエラーはトラップ(捕捉)できるエラーになります。OnErrorステートメントおよびErrオブジェクトのNumberロパティを使用してエラーへの対処を行うことができます。VBAでのエラーとは Subsample() DimiAsLong OnErrorResumeNext i=_A_ IfErr.Number…
よくあるVBA実行時エラーの解説と対応
VBAを書き終えて、いざ実行したら意味不明なメッセージが… ここでは初心者向けに、代表的な実行時エラーの解説とその対応について説明します。中級者以上の方は、実行時にトラップ可能なエラー番号一覧と対処 こちらを参考に、エラー対応(OnError等)を実装してください。



同じテーマ「マクロVBA入門」の記事

第59回.コレクション処理(For Each)
第60回.エラー処理(On Error)
第61回.「On Error GoTo」と「Exit Sub」
第62回.「On Error Resume Next」とErrオブジェクト
第63回.ブックを開く(Open)
第64回.ブックを閉じる・保存(Close,Save,SaveAs)
第65回.シートの挿入、名前の変更(Add,Name)
第66回.シートのコピー・移動・削除(Copy,Move,Delete)
第67回.総合練習問題7
第68回.シートの保護、ブックの保護(Protect)
第69回.シートの非表示(Visible)


新着記事NEW ・・・新着記事一覧を見る

PowerQueryの強力な機能をVBAから利用する方法|VBA技術解説(8月4日)
練習問題31(セル結合を解除して値を埋める)|VBA練習問題(7月30日)
練習問題30(マトリックス→リスト形式)|VBA練習問題(7月25日)
Applicationを省略できるApplicationのメソッド・プロパティ一覧|VBA技術解説(7月22日)
コレクション(Collection)の並べ替え(Sort)に対応するクラス|VBA技術解説(7月20日)
CSVの読み込み方法(ジャグ配列)|VBAサンプル集(7月15日)
その他のExcel機能(グループ化、重複の削除、オートフィル等)|VBA入門(7月14日)
オートフィルタ退避回復クラスを複数シート対応させるVBAクラス|VBA技術解説(7月6日)
オートフィルタを退避回復するVBAクラス|VBA技術解説(7月6日)
IfステートメントとIIF関数とMax関数の速度比較|VBA技術解説(6月23日)


アクセスランキング ・・・ ランキング一覧を見る

1.最終行の取得(End,Rows.Count)|VBA入門
2.セルのコピー&値の貼り付け(PasteSpecial)|VBA入門
3.RangeとCellsの使い方|ExcelマクロVBA入門
4.Range以外の指定方法(Cells,Rows,Columns)|VBA入門
5.変数とデータ型(Dim)|ExcelマクロVBA入門
6.繰り返し処理(For Next)|ExcelマクロVBA入門
7.マクロって何?VBAって何?|ExcelマクロVBA入門
8.セルに文字を入れるとは(Range,Value)|VBA入門
9.ひらがな⇔カタカナの変換|エクセル基本操作
10.空白セルを正しく判定する方法(IsEmpty,IsError,HasFormula)|VBA技術解説



  • >
  • >
  • >
  • 「On Error Resume Next」とErrオブジェクト

  • このサイトがお役に立ちましたら「シェア」「Bookmark」をお願いいたします。


    記述には細心の注意をしたつもりですが、
    間違いやご指摘がありましたら、「お問い合わせ」からお知らせいただけると幸いです。
    なお、掲載のVBAコードは自己責任で使ってください。万一データ破損等の損害が発生しても責任は負いません。




    このサイトがお役に立ちましたら「シェア」「Bookmark」をお願いいたします。
    本文下部へ