Access VBA にて on error goto がたまに機能し

Access VBA にて on error goto がたまに機能しないPCがあるます。
具体的には、on error gotoのコーディングを無視して、エラーのポップアップが表示される
何か対応する方法は、ありますか？

環境 ネットーワークにあるmdbをドライブに接続して、Accessを起動しています。
　　Windows2000(sp4)+Access2000(sp3)
他のPCでは、問題ありません。PCは、イメージをクローンして作成していますので、同一です。

※コーディングイメージ
Private Sub 稼働時間_AfterUpdate()
on error goto ERR_稼働時間
Dim errcnt as integer

errcnt = 0

DoCmd.GotoRecord A_FORM,"時間入力",A_NEXT <----- エラーのポップアップが表示される

if errcnt = 1 Then
DoCmd.GotoRecord A_FORM,"時間入力",A_PREVIOUS
end if

exit sub

ERR_稼働時間:
errcnt = errcnt + 1
resume next
end sub

No.2 ベストアンサー 回答者： bonaron 回答日時： 2010/05/13 09:36

問題のＰＣで

VBE の [ツール] - [オプション] - [全般]タブ で
「エラートラップ」 が 「エラー発生時に中断」になっていませんか？

この回答へのお礼

5891615さん

早速ためして見ました
まさに、コレでした。
本当にありがとうございました

お礼日時：2010/05/14 08:20

No.1 回答者： mimeu 回答日時： 2010/05/13 09:27

DoCmd でやっている "時間入力" の処理内容と、

ポップアップされるエラーメッセージの内容をみて
判断することかと思いますが ・・・