（その１）の詳細 Dir関数の引数としてディレクトリパスをわたすとディレクトリ内のフォルダ名１つを返します。 Sub aaa() '「C:\work」フォルダ配下のフォルダ名を１つ表示します。 MsgBox folder = Dir("C:\work\", vbDirectory) End Sub ※第二引数には「v…