Excel VBA質問箱 IV

当質問箱は、有志のボランティア精神のおかげで成り立っています。
問題が解決したら、必ずお礼をしましょうね。
本サイトの基本方針をまとめました。こちら をご一読ください。

投稿種別の選択が必要です。ご注意ください。
迷惑投稿防止のため、URLの入力を制限しています。ご了承ください。


58387 / 76732 ←次へ | 前へ→

【23074】Re:ファイルを開く時のエラー回避
発言  ichinose  - 05/3/12(土) 9:07 -

引用なし
パスワード
   ▼かみちゃん さん、みなさん、おはようございます。

>
>>Dirを使うのは最悪で、FSOのFileExistを使用するべきですね。
>>
>>DirだとExcelで開けるFileでも、ErrorになってしまうCaseが存在しますので・・・
>
>これは、VBAでDir関数に260(Excel97は、261)バイト以上のパス名を指定すると「ファイルが見つかりません」のエラーになるケースのことでしょうか?
>いつも、エラーになる場合があることを認識しながら、簡単なので、Dir関数を使
>っていますので、それ以外に「最悪」な理由があれば、教えてください。

ファイルをオープンする時は、やっぱりOn Errorステートメントでしょうか?
ファイルが見つからない以外に思いつくエラーとしては、シェアエラーですね
つまり、別のプロセスでファイルがロックされている場合です。

以下のコードは別プロセスではないですが、

'====================================================
Sub main()
  flnm = ThisWorkbook.Path & "\book1.xls"
  Call mk_sample_open(flnm)
  On Error Resume Next
  Workbooks.Open flnm
  If Err.Number <> 0 Then
   MsgBox Err.Description
   End If
  Close #1
End Sub
'====================================================
Sub mk_sample_open(flnm)
  Open flnm For Input Lock Read As #1
End Sub

このマクロを含むブックとbook1.xlsは同じフォルダ内にあるという条件です。
確認してみて下さい
0 hits

【22961】ファイルを開く時のエラー回避 VBA初心者 05/3/8(火) 23:27 質問
【22965】Re:ファイルを開く時のエラー回避 かみちゃん 05/3/9(水) 6:46 回答
【23016】Re:ファイルを開く時のエラー回避 VBA初心者 05/3/10(木) 0:10 お礼
【23021】Re:ファイルを開く時のエラー回避 かみちゃん 05/3/10(木) 7:20 発言
【23067】Re:ファイルを開く時のエラー回避 ちゃっぴ 05/3/12(土) 2:10 発言
【23071】Re:ファイルを開く時のエラー回避 かみちゃん 05/3/12(土) 8:05 発言
【23074】Re:ファイルを開く時のエラー回避 ichinose 05/3/12(土) 9:07 発言
【23075】Re:ファイルを開く時のエラー回避 G-Luck 05/3/12(土) 9:24 発言
【23087】Re:ファイルを開く時のエラー回避 ちゃっぴ 05/3/12(土) 19:06 回答
【23089】Re:ファイルを開く時のエラー回避 かみちゃん 05/3/12(土) 19:25 発言
【23090】Re:ファイルを開く時のエラー回避 ちゃっぴ 05/3/12(土) 19:59 発言

58387 / 76732 ←次へ | 前へ→
ページ:  ┃  記事番号:
2610219
(SS)C-BOARD v3.8 is Free