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


【書式】

Folder.Name

フォルダの名前を設定/取得します。

すでに存在する同じ名前に設定しようとするとエラーになります。

Sub test45()
    Dim FSO As Object
    Set FSO = CreateObject("Scripting.FileSystemObject")
    ''C:\Workフォルダの名前をWork2に変更します
    FSO.GetFolder("C:\Work").Name = "Work2"
    Set FSO = Nothing
End Sub