【EXCEL VBA】フォルダ配下のファイル一覧を再帰的に取得したい前回の記事ではファイル一覧を取得する際に「fso.GetFolder(path).Files」を使用しましたが、今回はフォルダ一覧も取得する必要があるため「fso.GetFolder(path).SubFolders」も使用します。 サンプルプログラムを確認する（コピペOK） Sub sample() Call getFilesRecursive("C:\Drivers") End Sub Sub getFilesRecursive(path As String) Dim fso As FileSystemObject: Set fso = New FileSystemObject Dim objFolder As folder Dim objFile As file ' GetFolder(フォルダ名).SubFoldersでフォルダ配下のフォルダ一覧を取得 For Each objFo
