Excelエラーについて

LOTTY 2006-04-17 19:15:15 No: 95081

どなたか教えてください。

VBでネットワークドライブにある他のマクロを含んだエクセルファイルを開
くときに以下のエラーが表示され困っております。

「問題が発生したためMicrosoftExcelを終了します」

  AppName:excel.exe
  Appver:10.0.6501.0
  ModName:advapi32.dll
  ModVer:5.0.2195.7038
  offset:0001a35b

OSはWindows2000でExcelは2002のSP3
VB6.0 SP6です。

Excelエラー回避の方法かエラーでストップしない方法がありましたら教えてくだ
さい。

noname 2006-04-17 20:13:54 No: 95082

情報が足りないかと。
そもそも、コードを載せないってことは、コードに不備がある可能性が全く無いということですかね？

#「VBで」というからには、そのコードがおかしいからなんじゃないのかな＾＾；

LOTTY 2006-04-20 01:00:47 No: 95083

nonameさんご回答ありがとうございます。

Excelファイルを開くソースコードです。

On Error Resume Next

    Dim xlApp   As Excel.Application
    Dim xlBook  As Excel.Workbook
    Dim xlSheet As Excel.Worksheet

    Set xlApp = CreateObject("Excel.Application")
    Set xlBook = xlApp.Workbooks.open filename:="*****"
    Set xlSheet = xlBook.Worksheets(1)

補足ですが、10回に1回の頻度でエラーが発生しております。

Excel2002でエラー回避の方法かエラーでストップしない方法がありましたら教えてください。

あっきー 2006-04-20 01:43:06 No: 95084

まず、問題の切り分けをしたほうが良いのでは？

マクロの無いファイルを開いたときはどうなの？
→同じ現象がでる（PC、アプリの環境に問題あり？）
→現象が再現しなくなる（マクロに問題あり？）

お試しあれ。

特攻隊長まるるう 2006-04-20 04:00:15 No: 95085

同じく、問題の切り分けをしたほうが良いでしょう。
原因を特定できる情報が少なすぎます。

エクセルファイルのサイズを変更してエラーの頻度を
調べてみるとか。

もうすぐ定時ですよ^-^ 2006-04-27 02:12:08 No: 95086

とても初歩的なことで申し訳ないですが

オンエラーResume Nextしてたら

コード内で発生してるエラーわからないのでは？

ファイルがロックされてて開けないところへ強制的に

次のコードが実行されてエクセルが悲鳴あげてるのかも^-^;

適当な回答ですんません

もげ 2006-04-28 02:08:28 No: 95087

>VBでネットワークドライブにある他のマクロを含んだエクセルファイルを開くときに

とのことですが、
ローカルドライブにコピーして実行すると現象は収まる（再現しない）のですか？