Folderオブジェクト - Typeプロパティ

---

【書式】

Folder.Type

フォルダの種類を返します。

Sub test52()
    Dim FSO As Object
    Set FSO = CreateObject("Scripting.FileSystemObject")
    ''「ファイル フォルダ」と表示されます
    MsgBox FSO.GetFolder("C:\Work").Type
    Set FSO = Nothing
End Sub