機能と数式 | VBA | セミナー | オンラインソフト | お問い合わせ | その他
Top > Excel > VBA > FileSystemObject

FileSystemObjectオブジェクト - FolderExistsメソッド



【書式】
FileSystemObject.FolderExists(folderspec)

フォルダが存在するかどうか調べます。存在する場合はTrueを返します。
引数folderspecには存在を調べるフォルダ名を指定します。相対パスを指定することも可能です。相対パスでは、「.」がカレントフォルダを示し、「..」はカレントフォルダの親フォルダを表します。たとえば、カレントフォルダが「C:\Work\Job」だった場合、「.\Sub」は「C:\Work\Job\Sub」を表し、「..\Sub」は「C:\Work\Sub」を表します。
Sub test11()
    ''Subフォルダが存在するかどうか調べます
    Dim FSO As Object
    Set FSO = CreateObject("Scripting.FileSystemObject")
    If FSO.FolderExists("..\Sub") Then
        MsgBox "Subフォルダが存在します"
    Else
        MsgBox "Subフォルダは存在しません"
    End If
    Set FSO = Nothing
End Sub




このエントリーをはてなブックマークに追加