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

---

【書式】

File.Name

ファイルの名前を設定/取得します。

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

Sub test61()
    Dim FSO As Object
    Set FSO = CreateObject("Scripting.FileSystemObject")
    ''C:\Work\Book1.xlsの名前をSample.xlsに変更します
    FSO.GetFile("C:\Work\Book1.xlsx").Name = "Sample.xls"
    Set FSO = Nothing
End Sub