［Excel VBA］フォルダー内のサブフォルダー一覧を得る
ファイルシステムオブジェクトのGetFolderメソッドを使用する。以下はC:\Windowsフォルダー内のサブフォルダーをすべて表示させる例。
Dim obj As Object
With CreateObject("Scripting.FileSystemObject")
For Each obj In .GetFolder("C:\Windows").SubFolders
Debug.Print obj.name
Next obj
End With
« ［R］自然スプラインによるスプライン補間 | トップページ | ［Octave］シリアル日付値について »
「Excel VBA」カテゴリの記事
- ［Excel VBA］CSVファイルを高速で読み込む(2023.08.30)
- ［ExcelVBA］文字コードがutf-8のテキストファイルを出力する(2022.11.10)
- ［Excel VBA］カレントディレクトリを取得する(2021.09.17)
- ［Excel VBA］FileSystemObjectを使えるようにする(2020.03.22)
- ［Excel VBA］フォルダー内のサブフォルダー一覧を得る(2019.10.10)
コメント