【書式】
Folder.IsRootFolder
フォルダがルートフォルダかどうかをTrueまたはFalseで返します。
Sub test44() Dim FSO As Object Set FSO = CreateObject("Scripting.FileSystemObject") ''ルートフォルがどうかを表示します If FSO.GetFolder("C:\Work").IsRootFolder Then MsgBox "ルートフォルダです" Else MsgBox "ルートフォルダではありません" End If Set FSO = Nothing End Sub