Dir関数を使用し最下層のフォルダ名まで取得するには? (ID:87680)

名前

ホームページ(ブログ、Twitterなど)のURL (省略可)

本文 ちょっと修正です Function GetDirectries( strRoot As String, lngCount As Long ) As String() 'Dir関数でstrRootに含まれるディレクトリの配列とlngCountに配列の数 を返す 'ディレクトリが含まれない場合はlngCount=0を返す End Function