FileSystemObject:フォルダ内のすべてのファイルを取得(Files プロパティ)
フォルダ内のすべてのファイルを取得(Files プロパティ)
フォルダ内のすべてのファイル(Files コレクション)を取得するには、Folder オブジェクト の Files プロパティ を使用します。
FileSystemObject(FSO) で、フォルダを操作するには、Folder オブジェクト を使用します。Folder オブジェクト を取得するには、FSO の GetFolder メソッド を使用します。FileSystemObject(FSO)のインスタンスを生成する方法は、ファイルシステムオブジェクト(FileSystemObject)の使い方 を参照してください。
<取得>
object.Files
引数・戻り値
- object ・・・ Folder オブジェクトを指定します。
Files コレクションのプロパティ
Count プロパティ
ファイル数を取得します。
object.Count
引数・戻り値
- object ・・・ 対象となる Files コレクションを指定します。
- 戻り値 ・・・ ファイル数
Item プロパティ
引数 key で指定したファイルの File オブジェクト を取得します。
object [.Item ] ( key )
引数・戻り値
- object ・・・ 対象となる Files コレクションを指定します。
- key ・・・ ファイル名(文字列)を指定します。
- 戻り値 ・・・ File オブジェクト
Files プロパティ 使用例
サンプルVBAソース
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 |
Sub Sample_Files() Dim fso As New FileSystemObject Dim myFiles As Files Dim myFile As File Dim strFiles As String Set myFiles = fso.GetFolder("C:\Documents\Data3\").Files strFiles = "ファイル数:" & myFiles.Count & vbCrLf For Each myFile In myFiles strFiles = strFiles & myFile.Name & vbCrLf Next MsgBox strFiles End Sub |
実行結果
関連記事
-
TextStream ファイルの位置(AtEndOfLine,AtEndOfStream,Column,Line)
AtEndOfLine プロパティ 開いたファイル(TextStream ファイ …
-
FileSystemObject:ファイル・フォルダの最終更新日時を取得(DateLastModified プロパティ)
ファイル・フォルダの最終更新日時を取得(DateLastModified プロパ …
-
FileSystemObject:Folder オブジェクトの取得
Folder オブジェクトの取得 Folder オブジェクト を取得するには、F …
-
FileSystemObject:フォルダをコピー(CopyFolder メソッド)
フォルダをコピー(CopyFolder メソッド) FileSystemObje …
-
FileSystemObject:ドライブを取得する(GetDrive メソッド)
ドライブを取得する(GetDrive メソッド) FileSystemObjec …
-
ファイルシステムオブジェクト(FileSystemObject)の使い方
ファイルシステムオブジェクト(FileSystemObject) FileSys …
-
FileSystemObject:フォルダやファイルの種類を調べる(Type プロパティ)
フォルダやファイルの種類を取得(Type プロパティ) FileSystemOb …
-
FileSystemObject:ドライブを取得する(Drives プロパティ)
ドライブ(Drives コレクション)を取得する(Drives プロパティ) F …
-
FileSystemObject:ファイル・フォルダの最終アクセス日時を取得(DateLastAccessed プロパティ)
ファイル・フォルダの最終アクセス日時を取得(DateLastAccessed プ …
-
FileSystemObject:フォルダやファイルを削除(Delete メソッド)
フォルダやファイルを削除(Delete メソッド) FileSystemObje …