====== FileSystemObjectの使い方 ====== このページでは、VBAのFileSystemObjectについてまとめる。FileSystemオブジェクトとは、ファイル、フォルダ、ドライブを操作するオブジェクトである。 ===== FileSystemObjectの変数宣言と生成 ===== Dim [変数名] As Object Set [変数名] = CreateObject("Scripting.FileSystemObject") ===== FileSystemObjectを解放 ===== 'FileSystemObjectの解放 Set [変数名] = Nothing ===== フォルダを取得する方法 ===== Dim fso As Object Set fso = CreateObject("Scripting.FileSystemObject") 'フォルダを取得 Dim folder As Object Set folder = fso.getFolder(ThisWorkbook.Path) 'フォルダ名を出力 Debug.Print folder.Name 'FileSystemObjectの解放 Set fso = Nothing ===== 指定フォルダ内のファイル一覧を取得する方法 ===== Dim fso As Object Set fso = CreateObject("Scripting.FileSystemObject") 'フォルダを取得 Dim folder As Object Set folder = fso.getFolder(ThisWorkbook.Path) '指定フォルダ内のファイルを出力 Dim file As Object For Each file In folder.Files Debug.Print file.Name Next file 'FileSystemObjectの解放 Set fso = Nothing