- ベストアンサー
VBA フォルダ一覧を取得したい
フォルダを指定したら、その中のフォルダ一覧を配列に取得したいのです。 どうすればいいでしょう?中の中までは不要です。出来ればFSO使用で教えて下さい。
- みんなの回答 (2)
- 専門家の回答
関連するQ&A
- フォルダ一覧取得の設計について
フォルダの一覧を取得する簡単なサンプルを掲載します。 http://hanatyan.sakura.ne.jp/dotnet/folder04.htm これを実際に動かすとRECYECLEフォルダや System Volume Imformation フォルダを取得してしまいます。 そこでこれらを除去したわけですが、他にフォルダのアクセス権などを 考慮した方がいいのかと考え始めています。 今後、スマートフォン市場でWindows8に移行していく中で、 上記やそれ以外の注意点について何かアドバイスがあったらお願いします。
- ベストアンサー
- Visual Basic
- VBSでフォルダの一覧を取得させたいです。
VBSでフォルダの一覧を取得させたいです。 PC内の利用中全ドライブからフォルダを総ナメしたいのですが、ルート直下のフォルダはどうやって取得すればよいのでしょうか? その下の階層以降はいろいろサイトで見たのでなんとかなりそうなのですが。 よろしければソースが乗っているサイト、もしくはサンプルでもいただければ助かります。 よろしくお願いします。
- ベストアンサー
- その他(プログラミング・開発)
- フルパスの取得
あるフォルダの中にあるすべてのファイル(サブフォルダ内のファイルを含めて)のフルパスを取得するにはどうしたらよいのでしょうか?これはFSOで実現できるのでしょうか?それともFSOなど使わなくてもできるのでしょうか? よろしくお願いします。 (使っているのはVB6.0です)
- ベストアンサー
- Visual Basic
- フォルダ容量取得について
こんにちは。質問させて下さい。 同じサーバ内にあるフォルダの容量を取得したいと考えております。フォルダサイズを取得する関数はあるのでしょうか?調べたのですが見当たりませんでした。 もしロジックで行う場合、 その指定のフォルダ内に含まれているファイル一覧を取得して各ファイルサイズを合算することで対応するしかないでしょうか? ちなみにフォルダ内にはフォルダは存在しないものとします。どなたかご存知の方いらっしゃいましたらご教示お願い致します。
- ベストアンサー
- PHP
- VBAであるフォルダにあるフォルダを取得
VBA初心者です。 フォルダの階層を下に掘ってパスの文字列を生成したいのですが あるフォルダの中にある全てのフォルダ名前を取得するにはどうしたらいいのですか?
- ベストアンサー
- その他(プログラミング・開発)
- VBScriptで、任意のフォルダコレクションを取得するには?
VBScriptについて質問します(マイナーですみません) 任意のフォルダコレクションを取得して、 そのフォルダ名を1つ1つ得たいんですが、 うまくいきません。 FileSystemObjectを作成して、 任意のフォルダ(MyFolder)を取得することはできました。 Set fso=CreateObject("Scripting.FileSystemObject") Set f=fso.GetFolder("C:/....../デスクトップ/MyFolder") いま、MyFolder の下に、複数のサブフォルダがあるとき、 サブフォルダのコレクションを取得して、 サブフォルダ名を1つ1つ得るには、 どうしたらいいのでしょうか? よろしくおねがいします。
- ベストアンサー
- その他(プログラミング・開発)
- VBAでアクティブなファイルを参照して、ファイル一覧作成(サブフォルダ含む)
VBAでアクティブなファイルのフォルダ(サブフォルダを含む)のファイル一覧を 作成したいと思っています。 以下のサイトを参考にして、パス、ファイル名を落とすまではできました。 http://okwave.jp/qa3544575.html === Sub test() Application.ScreenUpdating = False Sheet1.Cells.Clear Sheet1.Cells(1, 1) = "パス" Sheet1.Cells(1, 2) = "ファイル名" files "d:\", 2 Application.ScreenUpdating = True End Sub Sub files(path As String, ByRef row As Long) DoEvents Dim fso As Object Set fso = CreateObject("Scripting.FileSystemObject") Dim f As Object For Each f In fso.GetFolder(path).files Sheet1.Cells(row, 1) = path Sheet1.Cells(row, 2) = f.Name row = row + 1 Next For Each f In fso.GetFolder(path).SubFolders files f.path, row Next Set fso = Nothing End Sub === >files "d:\" の箇所を修正して、アクティブなブックを参照しようとしてみたのですが、 なかなか上手くいきません。 また、できれば *.xls などファイルの種類を指定したいのです。 filesearchを使用して組んだ時は 「AAA = ActiveWorkbook.path」「Filetype ~ 」 などでそれらの指定ができたのですが、上記に応用する事ができません。 どなたかご教示頂けますよう、よろしくお願いいたしますm(_ _)m
- ベストアンサー
- オフィス系ソフト
- クラスパス配下のファイル名一覧取得
ある、クラスパスの通ったフォルダ(仮にdir)があったとして そのフォルダ内にあるファイル名一覧を取得したいと考えております。 dir/ ->a.txt ->b.txt ->c.txt 結果:a.txt、b.txt、c.txt ClassLoader クラスなどを用いて取得しようと考えたのですが、 getSystemResource() メソッドなどはファイル名まで指定しないと 取得できないみたいで、現時点で望む処理ができない状態です。 フォルダまでの絶対パスの指定はしたくないため、 Fileクラスも使用できない状態です。 このような処理をやったことがある方は、 どうかご教授お願いいたします。
- 締切済み
- Java
- OutlookExpressのフォルダ一覧が消えてしまいました。。。たすけて!
OutlookExpressのメールソフトを使用しているのですが、画面の左端に出ていたフォルダー一覧(受信トレイ、送信済みあいてむ、ごみ箱、etc)が消えてしまい困っております。。。 今までだと 「表示」→「レイアウト」の中のフォルダ一覧をチェックを入れるとフォルダが一覧が表示出来ていたのですが、チェックを入れても表示されなくなってしまいました。。。 どなたか、この内容でピンと来る方いますか??? 困っております。。。
- 締切済み
- オフィス系ソフト
お礼
ありがとうございます。 実は御推察通り呼び出しで詰まってます。 >vRtn(i) = f.Name ' (サブ)フォルダ名を配列変数に格納 配列はvariant型のようですが、Stringは使えないのでしょうか?ネットで検索してもセルに直接代入とか、variantが多いようです。また、f.Nameの型は何なのでしょうか?string?