• 締切済み

特定フォルダ内のファイル名取得について

こんばんわ。お世話になってます。 あるフォルダ内(C\MyForder)に保存している様々なファイル名(エクセルやワード等が保存) をUserForm内のListBoxに表示させたいのですが、どのようにしてファイル名を取得したら良いのでしょうか? また、ListBoxに表示されたファイル名を選択すると、そのファイルを 起動させたいと思っています。ご教示お願いします。

みんなの回答

  • marbin
  • ベストアンサー率27% (636/2290)
回答No.1

1.FileSystemObjectを使う方法 Office TANAKA - FileSystemObjectの解説(はじめに) http://www.officetanaka.net/excel/vba/filesystemobject/index.htm FileSystemObjectオブジェクトを利用する(1) - @IT http://www.atmarkit.co.jp/fwin2k/tutor/cformwsh16/cformwsh16_01.html エクセルExcel大事典 VBAマクロ FileSystemObject FSO ファイル フォルダ 操作 コピー 削除 http://home.att.ne.jp/zeta/gen/excel/c04p24.htm 2.Dir関数の戻り値を使う方法 Dir関数の注意点 http://officetanaka.net/excel/vba/tips/tips69.htm などがあります。

関連するQ&A

  • Excel VBAでフォルダー・ファイル名の取得

    いつもお世話になります。 Excelで、決められたディレクトリーの下にあるフォルダー名とファイル名を取得して Excelに表示したいのですが、調べたのですがよくわかりませんですた。 決められたディレクトリーは固定で、その下には複数フォルダーがあります。 よろしくお願い致します。

  • フォルダ内取得について

    質問です。 「あるフォルダ以下にあるファイルをすべて取得する」で、 Dim files As New ArrayList '"C:\My Documents"以下のファイルをすべて取得 GetAllFiles("C:\My Documents", "*.*", files) 'ListBox1に結果を表示する ListBox1.Items.AddRange(files.ToArray()) でフォルダ内を取得する方法は分かっていますが、 この取得したファイル以外で特定のファイル以外を 削除する事は出来ますでしょうか? 例えば Test1.txt←必要 Test2.txt←不要 Test3.txt←必要 でファイル取得した時に ("Test1.txt")と("Test3.txt")だけ残して 他は削除したいのです。 必ずしも"test2.txt"という名前ではありません。 この行動を文法(ソース)を書きたいのですが、 分かりません。 どなたか教えてください。

  • フォルダがファイルに化けた!?

     こんにちは  エクセルのファイルを、あるフォルダの中にコピーしようとしたところ,フォルダ名がファイル名になり,フォルダが無くなってしまいました。  フォルダの中にはいくつかのファイルが保存されていたのですが,そのファイルをダブルクリックすると,エクセルが起動し,コピーしたエクセルの内容が表示されます。  また,そのファイルと同じ名前でフォルダを作成しようとすると,エラーが出てフォルダが作成できません。(ファイルをフォルダと認識しているみたいです。)  このファイルになってしまったフォルダを,元に戻し,フォルダの中のファイルを救うことは出来ませんか? 教えてください。ちなみに使用OSはWinmeです。

  • EXCELファイルのカレントフォルダを取得するには?

    EXCELファイルのカレントフォルダを取得するには? C:\経理\予算.xls D:\2005年度\予算.xls EXCEL97ファイルがあります。 VBAで   カレントフォルダ名 (C:\経理\,D:\2005年度\) を取得する事は可能でしょうか? CURDIRでは上手い方法が見つかりませんでした。

  • ファイルが消えました!!

    2台のPCでルーターを介して小規模LANを構築しています。共有フォルダを作って、今まで問題なく使えていたのですが、「スタート>Office>Word」から起動させて作ったWordファイルを「名前を付けて保存」で共有フォルダ内を選択して保存してそのままWordファイルを閉じたところ、ものの見事に保存がされていませんでした。PC内をさんざん検索しましたが見つかりません。試しに、同じ様にして3度程保存しましたが、全然保存(表示)されません。さらにExcelでも試してみたところ、やはり保存(表示)されません。同じ名前で別のExcelファイルを保存しようとすると「その名前は既に存在します」と表示されます。でもそんなファイルはないんです・・・。Excelの方は検索すると出てきたのでプロパティを見ると、間違いなく共有フォルダ内にあるとプロパティから確認できます。でもないんです・・・。どうすればいいのでしょうか??XP、office2007です。

  • フォルダー内のエクセルファイルのW.C.でエラー

    ある時突然下記の現象が発生し困っています。  使用環境 OS Vista        Office 2007 フォルダー内のエクセルファイルをダブルクリックして開こうとすると  'C:¥Users¥taro¥Documents¥開きたいファイル.xlsx'が見つかりません。  名前を正しく入力したかどうかを確認してから、やり直してください。 というメッセージが表示されファイルが開きません。 予めエクセルを起動しておいて、ファイルを選択してエクセル上にドロップすると ファイルは正常に開くので、ファイルが壊れてはいないようです。 この現象はフォルダ^に保管されている全てのエクセルファイルで発生。 PCを再起動しても直らない。 この現象はエクセルのみ。ワード、パワーポイント、PDFファイルは問題なし。 回復方法をご教示頂けますよう、お願い致します。

  • VBAを使い、同一フォルダにあるファイルの特定のシートの情報を取得したい

    はじめまして。 書籍や過去の質問等を調べましたが、類似するものを見つけられなかったため質問させていただきます。 Xというエクセルファイルで、Xと同一フォルダ内にある、ファイル名に特定の文字列(例えば「月報」)を含んだ全てのエクセルファイルの、特定の文字列(例えば「○年○月」)を含んだ全シートの、一定のセル範囲をひとつのシートにまとめたいと思っています。 X内のコマンドボタンで動かす予定ですが、複数のボタンになると自分では思っています(ボタンAでファイル名の取得、ボタンBでシートの取得、ボタンCでセルに貼り付け、みたいな感じで。ボタンの数は特に制限はないです) 要点としては a, 定定の文字列を含んだファイル名の取得 b, aで取得したファイル内の特定の文字列を含んだ全てのシート内の一定のセル範囲の取得(シートの数はファイルによる。必ずしも1つというわけではない。) c. bで取得した一定のセル範囲のデータを、1つのシートにまとめる。 あとはこれらのデータをtxtやcsvなどに出力できるようにするつもりです。 私がやってできたのは、同一フォルダ内にあるファイル名に特定の文字列を含むファイルの全てのファイル名を指定したセルに吐き出すことしかできませんでした。 なんか、ややこしい表現かもしれませんが、ご指導お願いします。 環境はxp、エクセル2003です。 よろしくお願いします。

  • フォルダの中の特定のファイルを取得

    (VB.NET) Dim files As String() = System.IO.Directory.GetFiles("C:\aaa", "*", System.IO.SearchOption.AllDirectories) ListBox1.Items.AddRange(files) 上記のコードでは"C:\aaa"以下のすべてのファイルを取得しますが、 例えばGetFilesメソッドの2番目のパラメータに "*.(html|htm)"などと指定して(この場合は無理でしたが)"C:\aaa"以下の拡張子が「html」または「htm」のファイルを取得するにはどうすればよいでしょうか。 "*.html"のように1種類の場合はできるのですが…。

  • Excel 埋め込みオブジェクトのファイル名取得

    Excelファイルに挿入>オブジェクト>ファイルから ・・・ で選択し、埋め込んだオブジェクトのファイル名をVBAで 取得する事はできますか? 実際には上記のように手動ではなく、 Application.Dialogs(xlDialogInsertObject).Show , " ", , True でダイアログを表示し、ファイルを選択させています。 埋め込んだファイルがフォルダ階層が深かったりすると、 ファイル名まで表示されないので、ファイル名を取得して、 別のセルに入力するまでをVBAで処理をしたいと考えています。 既に埋め込まれているオブジェクトの名前を取得する、もしくは ダイアログで選択されたファイルの名前を取得する、ということが できるのであれば教えていただけますでしょうか?

  • 共有フォルダ内のファイルが開けない

    Windows Meにある共有フォルダ内のWordとExcelのファイルを同じネットワーク内にあるWindows XP×4台から開くことが出来ません。 共有フォルダへはアクセスできます。同じ共有フォルダ内に保存されている画像ファイル等は開くことが出来ます。 Win Me:Word2002&Excel2002 Win XP:Word2003&Excel2003 但し、共有フォルダ内のWordとExcelのファイルを自機のデスクトップに貼り付けて開くと正常に開くようです。 共有フォルダ内のファイルを直接開こうとすると、アプリが起動するだけで表示されない、といった具合です。 これら以外にもPCは有りますが、それら同士ではこういった現象は発生しないようです。 何が悪いんでしょうか?どうすればよいでしょうか? ご教示お願いいたします。

専門家に質問してみよう