
VBAの初心者です。いろいろと勉強しているのですが、エラーハンドリングについて理解できずに悩んでいます。
On Error GoTo について、インターネットからサンプルコードをコピーして試しているのですが、On Error GoTo が上手くできません。
Sub sample_error01()
Dim i
On Error GoTo ErrLabel
For i = 1 To 40
Worksheets(i).Activate
Next
Exit Sub
ErrLabel:
MsgBox "エラー番号: " & Err.Number & Chr(13) & Err.Description
End Sub
シートの数が40もないので、エラーが発生しますが、以下のプロージャを実行しても、ErrLabel: に遷移せずエラーが発生してしまいます。どうしてでしょう?
No.2ベストアンサー
- 回答日時:
補足です。
●エラー処理対象外のエラーで中断(E)
が選択されている状態がデフォルトだと思いますが、
●エラー発生時に中断(B)
が選択されているとErrLabel: に遷移せずエラーが発生します。
※質問内容に記載のコードをコピペして試してみました。
ご指摘のとおり「エラートラップの設定」によるものでした。教えていただかなければ、なかなか気が付かず解決できなかったと思います!教えていただきありがとうございました!
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
このQ&Aを見た人はこんなQ&Aも見ています
関連するカテゴリからQ&Aを探す
おすすめ情報
このQ&Aを見た人がよく見るQ&A
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
UserForm1.Showでエラーになり...
-
【VBA】ワークブックを開く時に...
-
String""から型'Double'への変...
-
助けてください
-
ApplicationとWorksheetFunctio...
-
インポート時のエラー「データ...
-
【VBAエラー】Nextに対するFor...
-
VBA データ(特定値)のある最...
-
SQLでエラーです。
-
IISの仮想ディレクトリ作成がわ...
-
VBAのエラーについて
-
VBAでのファイル読込エラー...
-
ACCESSで値を代入できないとは?
-
On ErrorでエラーNoが0
-
ExcelのWebクエリでのエラー
-
実行時エラー 438 の解決策をお...
-
VB2010でデータグリッドビュー...
-
VBA IE要素 objIE.document.all...
-
数式は残し値をクリアするマク...
-
Pythonでの文字列からfloatへの...
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
UserForm1.Showでエラーになり...
-
お助けください!VBAのファイル...
-
【VBA】ワークブックを開く時に...
-
VBAでfunctionを利用しようとし...
-
String""から型'Double'への変...
-
実行時エラー 438 の解決策をお...
-
マクロで"#N/A"のエラー行を削...
-
レコード登録時に「演算子があ...
-
文字列内で括弧を使うには
-
【Access】Excelインポート時に...
-
インポート時のエラー「データ...
-
Filter関数を用いた結果、何も...
-
ApplicationとWorksheetFunctio...
-
On ErrorでエラーNoが0
-
Excel vbaについての質問
-
VBA データ(特定値)のある最...
-
ACCESSで値を代入できないとは?
-
【VBAエラー】Nextに対するFor...
-
「実行時エラー '3167' レコー...
-
実行時エラー'-2147467259(8000...
おすすめ情報