Excel VBA質問箱 IV

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

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


62650 / 76732 ←次へ | 前へ→

【18688】Re:ファイルの存在チェック
回答  Kein  - 04/10/5(火) 17:55 -

引用なし
パスワード
   >Dir(別のファイルパス)
ということから推測すると、それぞれ別のフォルダーにあるファイルなわけですか ?
ならば

Dim FP As Variant
Dim i As Integer

FP = Array("C:\Temp\Test1.txt", "C:\My Documents\Test2.txt", _
"C:\Windows\Test3.txt")
For i = LBound(FP) To UBound(FP)
  If Dir(FP(i)) = "" Then
   MsgBox FP(i) & vbLf & "は存在しません", 48
  End If
Next i

などと、フルパスを配列に入れてループします。

1 hits

【18677】ファイルの存在チェック Qs 04/10/5(火) 15:26 質問
【18678】Re:ファイルの存在チェック Asaki 04/10/5(火) 15:31 回答
【18679】Re:ファイルの存在チェック Qs 04/10/5(火) 15:36 お礼
【18680】Re:ファイルの存在チェック Qs 04/10/5(火) 15:58 質問
【18682】Re:ファイルの存在チェック Asaki 04/10/5(火) 16:09 回答
【18683】Re:ファイルの存在チェック Asaki 04/10/5(火) 16:18 発言
【18688】Re:ファイルの存在チェック Kein 04/10/5(火) 17:55 回答
【18691】Re:ファイルの存在チェック ちゃっぴ 04/10/5(火) 20:26 回答

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