VBA 指定したフォルダ内のサブフォルダを取得する

■指定したフォルダパスのフォルダ内のサブフォルダを取得しパスを配列で返す 呼び出し元プロシージャ Sub TestGetFolderArray() Dim arrayFolders() As String Dim strFolderPath As String Dim i As Integer strFolderPath = "C:\テスト" arrayFolders = getSubFolderArray(strFolderPath) For i = 0 To UBound(arrayFold…