過去ログ

                                Page     349
━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━
   通常モードに戻る  ┃  INDEX  ┃  ≪前へ  │  次へ≫   
━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━
 ▼エラー番号一覧について  けん 03/8/3(日) 0:35
   ┗Re:エラー番号一覧について  しろくろやぎ 03/8/4(月) 11:28
      ┗Re:エラー番号一覧について  けん 03/8/4(月) 11:36

 ───────────────────────────────────────
 ■題名 : エラー番号一覧について
 ■名前 : けん <kenichi_yuzawa@yahoo.co.jp>
 ■日付 : 03/8/3(日) 0:35
 -------------------------------------------------------------------------
   アクセスエラー番号(Err.Number)とそのディスクリプション(Err.Description
)の一覧を探しております。
どなたかご存知の方いらっしゃいましたら、回答をお願いいたします。

 ───────────────────────────────────────  ■題名 : Re:エラー番号一覧について  ■名前 : しろくろやぎ  ■日付 : 03/8/4(月) 11:28  -------------------------------------------------------------------------
   ▼けん さん:
>アクセスエラー番号(Err.Number)とそのディスクリプション
> (Err.Description)の一覧を探しております。
>どなたかご存知の方いらっしゃいましたら、回答をお願いいたします。

プログラムを書いて、自分で調べるという手があります。

下のプロシージャーを作り、イミディエイトウィンドウで
Call Err_List
と呼ぶと、その下に一覧が表示されます。


Sub Err_List()

 On Error GoTo Err_Jump

 For i = 1 To 10000
  Error i
 Next i
 Debug.Print "!! 終了 !!"
 Exit Sub

Err_Jump:
 If Err.Description <> _
  "アプリケーション定義またはオブジェクト定義のエラーです。" Then
   Debug.Print Format$(Err.Number, "00000") & ":" & Err.Description
 End If
 Resume Next

End Sub

 ───────────────────────────────────────  ■題名 : Re:エラー番号一覧について  ■名前 : けん <kenichi_yuzawa@yahoo.co.jp>  ■日付 : 03/8/4(月) 11:36  -------------------------------------------------------------------------
   しろくろやぎさん

ご回答ありがとうございます。
早速やってみまして、無事に一覧を表示することが
できました。

ありがとうございました。

━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━    通常モードに戻る  ┃  INDEX  ┃  ≪前へ  │  次へ≫    ━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━                                 Page 349