Excel VBA質問箱 IV

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

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


8448 / 13646 ツリー ←次へ | 前へ→

【33254】My Documentsの中にdata.csvがあるか いちご 06/1/5(木) 22:25 質問[未読]
【33255】Re:My Documentsの中にdata.csvがあるか かみちゃん 06/1/5(木) 22:33 回答[未読]
【33256】Re:My Documentsの中にdata.csvがあるか いちご 06/1/5(木) 22:56 お礼[未読]

【33254】My Documentsの中にdata.csvがあるか
質問  いちご  - 06/1/5(木) 22:25 -

引用なし
パスワード
   教えてください
My Documentsの中にdata.csvがあるかをたずねて,その有無を知りたいと思っています。
data.csvがあれば,そのファイルを読み込み,なければ,その名前で,ファイルを作っていきたいと考えています。
このとき,ダイアログなどを表示しないで進めていきたいのですが,その方法を教えてください。

【33255】Re:My Documentsの中にdata.csvがあるか
回答  かみちゃん  - 06/1/5(木) 22:33 -

引用なし
パスワード
   こんにちは。かみちゃん です。

>My Documentsの中にdata.csvがあるかをたずねて,その有無を知りたいと思っています。

Dir関数をヘルプまたは、過去ログで調べてみてください。
たとえば、こんな感じになります。

Sub Macro1()
 Dim strFileName As String

 strFileName = "C:\My Documents\data.csv"
 If Dir(strFileName) <> "" Then
  MsgBox strFileName & "は存在します"
 Else
  MsgBox strFileName & "は存在しません"
 End If
End Sub

【33256】Re:My Documentsの中にdata.csvがあるか
お礼  いちご  - 06/1/5(木) 22:56 -

引用なし
パスワード
   かみちゃん 早々と教えてくれてありがとう。
無事解決しました。
次のステップに進むことができました。

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