【書式】
FileSystemObject.GetFile(filespec)
指定したファイルを表すFileオブジェクトを返します。
引数filespecにはファイル名を含むパスを指定します。
Sub test17() Dim FSO As Object, FileObject As Object Set FSO = CreateObject("Scripting.FileSystemObject") ''C:\Book1.xlsxのサイズを返します Set FileObject = FSO.GetFile("C:\Book1.xlsx") MsgBox FileObject.Size Set FileObject = Nothing Set FSO = Nothing End Sub