読者です 読者をやめる 読者になる 読者になる

Learning Note

できるようになったことを記録しています

指定したフォルダ以下の指定した種別ファイルパスを取得する

Excel VBA 入力系

指定したフォルダの下位フォルダも再帰処理で検索対象とする関数。

ポイントはStatic変数。再帰処理でDimを使うと消えてしまうので。


使用例

Sub Main()
    Dim filePath As Variant
    filePath = RecursionFile("C:\bin", "*.xlsx")
End Sub