FileSystemObject:指定フォルダに含まれるすべてのフォルダを取得(SubFolders プロパティ)
フォルダに含まれるすべてのフォルダを取得(SubFolders プロパティ)
FileSystemObject(FSO)で、指定したフォルダに含まれるすべてのフォルダ(Folders コレクション)を取得するには、Folder オブジェクト の SubFoldersプロパティ を使用します。
FileSystemObject(FSO)のインスタンスを生成する方法は、ファイルシステムオブジェクト(FileSystemObject)の使い方 を参照してください。
<取得>
object.SubFolders
引数・戻り値
- object ・・・ Folder オブジェクトを指定します。
Folder オブジェクトに関しては、FileSystemObject:Folder オブジェクトの取得 を参照してください。
SubFolders プロパティ 使用例
サンプルVBAソース
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 |
Sub Sample_FSOSubFolders() Dim fso As New FileSystemObject Dim myFolders As Folders Dim f As Folder Dim str As String Set myFolders = fso.GetFolder("C:\Documents\mydata3\test1\").SubFolders For Each f In myFolders str = str & f.Name & vbCrLf Next MsgBox str End Sub |
実行結果
関連記事
-
-
FileSystemObject:フォルダまたはファイルの名前を取得または設定する(Name プロパティ)
フォルダまたはファイルの名前を取得または設定する(Name プロパティ) Fil …
-
-
FileSystemObject:ドライブの存在確認(DriveExists メソッド)
ドライブの存在確認(DriveExists メソッド) FileSystemOb …
-
-
ファイルシステムオブジェクト(FileSystemObject)の使い方
ファイルシステムオブジェクト(FileSystemObject) FileSys …
-
-
TextStream ファイルの位置(AtEndOfLine,AtEndOfStream,Column,Line)
AtEndOfLine プロパティ 開いたファイル(TextStream ファイ …
-
-
FileSystemObject:フルパスからファイル名、パスを取得する(GetFileName、GetParentFolderName)
フルパスからファイル名やパスを取得する FileSystemObject(FSO …
-
-
FileSystemObject:フォルダやファイルをコピー(Copy メソッド)
フォルダやファイルをコピー(Copy メソッド) FileSystemObjec …
-
-
FileSystemObject:ファイルやフォルダまたはドライブのパスを取得(Path プロパティ)
ファイルやフォルダまたはドライブのパスを取得(Path プロパティ) FileS …
-
-
FileSystemObject:フォルダ内のすべてのファイルを取得(Files プロパティ)
フォルダ内のすべてのファイルを取得(Files プロパティ) フォルダ内のすべて …
-
-
FileSystemObject:ファイル・フォルダの最終更新日時を取得(DateLastModified プロパティ)
ファイル・フォルダの最終更新日時を取得(DateLastModified プロパ …
-
-
FileSystemObject:8.3形式のファイル名(フォルダ名)またはパスを取得(ShortPath, ShortName)
8.3形式のファイル名(フォルダ名)またはパスを取得(ShortPath, Sh …