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

---

【書式】

File.Size

ファイルのサイズを返します。

Sub test66()
    Dim FSO As Object
    Set FSO = CreateObject("Scripting.FileSystemObject")
    ''C:\Work\Book1.xlsxのサイズを表示します
    MsgBox FSO.GetFile("C:\Work\Book1.xlsx").Size
    Set FSO = Nothing
End Sub