• ベストアンサー

指定したファイルが存在するか調べる

エクセルVBAで指定したフォルダ無いにa.csvというファイルが存在するか調べる方法はありますか？

質問者が選んだベストアンサー

  • ベストアンサー
  • keithin
  • ベストアンサー率66% (5278/7940)
回答No.1

sub macro1() 　dim myPath as string 　mypath = "C:\指定のフォルダ\" 　if dir(mypath & "a.csv") <> "" then 　　msgbox "FOUND a.csv" 　else 　’msgbox "NOT FOUND" 　end if end sub

全文を見る
すると、全ての回答が全文表示されます。
  1. カテゴリ
  2. パソコン・スマートフォン
  3. ソフトウェア
  4. Excel（エクセル）

関連するQ&A

  • ExcelVBAでファイルを開くフォルダ指定方法

    ExcelのVBAを用いて実験データのcsvファイルをまとめるプログラムを書いています． 肝心のプログラムはほぼできています． しかし OpenfileName = Application.GetOpenFilename("CSVファイル,*.csv?") としたときに開かれるフォルダ（ファイルを指定するフォルダ）がカレントフォルダ？となっております． 実行するExcel（VBA入り）と実験データが下記のパスにあったとして C:\Users\ABC\Documents\Data\110302\ カレントフォルダはなぜかマイドキュメントがデフォルトになってしまいます． C:\Users\ABC\Documents\ 階層移動できるので問題なくもないのですが，一々階層移動するのも面倒なので修正したいと考えております． そこで (1)プログラム実行直前にカレントフォルダを実行するExcel(VBA入り)の位置に変更する方法 (2)カレントフォルダと関係なく実行するExcel(VBA入り)があるフォルダを開く方法 どちらかで対処できると考えたのですがその方法が見つかりません． （ちなみに実行するExcel(VBA入り)の位置は動かすものとするので絶対パスでの指定はなしとします） どなたかご教授お願いします．

  • エクセルから指定フォルダーのファイルを削除？

    またまた　お願いします。 エクセルで作成したシートを指定のフォルダー内にCSVで保存することが できましたが、逆にそれを削除するにはマクロやVBAでどう記述すればよいのでしょうか？ エクセルヘルプみてもわかりませんでした。 お願いします。

  • 複数のCSVファイルからのデータ取得（VBA）

    エクセルVBAで、エクセルの指定シートに複数のCSVファイルからデータを取得する方法を ご教授お願います。 エクセルの指定シートの指定されたセルに、複数のCSVファイルから指定箇所のデータを 取得し転送する方法を考えていますが、どうもうまくいきません。 たとえば、 CSVファイル(1)　A5（A） 　　　　　　　　　　A10（B） CSVファイル(2)　A5（C） 　　　　　　　　　　A10（D）　　　　　 CSVファイル(3)　A5（E） 　　　　　　　　　　A10（F）　　　 　　　　　・ 　　　　　・ 　　　　　・ と、指定されたセルからデータを取得し、 エクセルの指定シートの表に 　　　　　　　　　　　　　　　　　　　CSVファイル　　　　　　　　　　　　　　　 　　　　　　　　　　　　　　　　　(1)　　(2)　　(3)　・　・　・ ------------------------------------------- A5から取得したデータ　　　　A　　 C　　 E ・　・　・ A10から取得したデータ 　　 B 　　D 　　F　・　・　・ ------------------------------------------- と、いうように転送して貼り付けていきたいです。 いろいろ調べてみたのですが、このような方法が見つけられませんでした。 ぜひ、皆様のお知恵をお貸しください。 宜しくお願い致します。

  • Accessで存在しないファイルを指定して出力したい

    DoCmd.TransferTextを使ってCSVファイルの出力を行いたいのですが、存在しないディレクトリを指定してファイル出力を行うとエラーメッセージ3044でエラーになります。 存在しないディレクトリが指定された場合は新たにディレクトリを作成してファイル出力を行うにはどうしたらよいでしょうか？

  • フォルダ内のファイル読み込み

    エクセル2003のＶＢＡを使って、特定のフォルダ内の複数のＣＳＶファイル全てを「順番」に読み込む（ファイルを開く）方法を教えて下さい。 フォルダの中には「0.csv」～「12.csv」が入っています。 （しかし、間の番号が無い場合があります。例えば、0～4と6～10のファイルがあり、間に「5」がない。 必ず「0」から始まるないし、最後のファイル名の数字も違う。） よろしくお願いします。

  • TXTファイルからExcelへ指定行を抽出

    OffceXPを使用しております。 表題の通りなのですが、テキストファイル内のデータから指定した行をExcelのファイルへ抽出する方法を教えて下さい。 （ファイルは「.TXT」形式と「.CSV」形式の2種類が用意できます。) 当初はファイル名の一覧行を作り 「='ドライブ名:\フォルダ名\[ファイル名.csv]シート名'!$A$1」 の式を用いて表を作成しようとしたのですが、この方法ではファイルを全部開き値を更新しないとエラーが出てしまいました。 ファイルは200以上有り、1つ1つを開いてデータを引っ張るには無理があります。 フリーソフトを探してみましたが、指定文字を含む行を抽出するソフトは数多くあったのですが、 「指定行」というのが見つからず、お手上げです。 関数や数式・VBAもしくはフリーソフト等、簡易にデータ抽出が出来れば何でも結構です。 但し、VBAに関しては殆ど知識が無いので、解り易く書いて頂けると幸いです。 欲を言えば、ファイル名も同時に抽出出来ればあり難いですが、こちらはさほどこだわりません。 良い方法をご存知な方がいらっしゃればどうかご教示下さいませ。 宜しくお願い致します。

  • 複数のCSVファイルを1つのファイルにまとめる方法

    EXCELで、あるフォルダ(例:Dir1)に格納されている複数のCSVファイルを読み込んで、そのファイルの1行目をコピーし、別ファイル(a.csv)にペーストしたいと思っております。 例えば、Dir1には1.csv,2.csv,3.csvの3つのCSVファイルが存在した時に、a.csvに出力されるのは、 ----------------------------------- 1.csvの1行目 2.csvの1行目 3.csvの1行目 ----------------------------------- となるのが、理想の形です。 方法を知っている方がいらっしゃったら お教えいただければと思います。

  • EXCEL VBA 外部データ取り込み時にダイアログボックスでファイル指定したい

    EXCEL VBAでCSVファイルを外部データ取込で取り込む場合、ダイアログボックスを開いてファイルを指定して取り込む方法ってありますか？

  • 指定したフォルダから1つ目のファイル名のみ取り

    エクセルのvbaで指定したフォルダに格納されている1つ目のファイルのファイル名のみを取り出したい場合、どうソースを記述すればよいでしょうか？ For Each を使用した場合は全件取り出してしまいますので… 何か良い方法がありましたらご教示ください。

  • CSVファイルの指定部分をエクセルに取り込みたい

    複数のCSVファイルをエクセルに、VBAを使用して取り込みます。 CSVファイルの形式は決まっているのですが、キーワード行から指定行分のみを取り込みたいです。 データ形式は、 Ａ１ aaa bbb ccc Ｂ１ aaa bbb ccc Ｃ１ aaa bbb ccc Ａ１ a1a b1b c1c 　: 　: という感じで、キーワードＡ１行以下から次のキーワードより上のデータをエクセルに取り込みたいです。 どうぞよろしくお願いいたします。

注目のQ&A

カテゴリ

専門家に質問してみよう

職業から探して質問する

あなたにピッタリな商品が見つかる！ OKWAVEセレクト

質問する