ファイルやフォルダのサイズを取得（Size プロパティ）
FileSystemObject（FSO）で、指定したフォルダに含まれるすべてのファイルとフォルダの合計サイズを取得するには、Folder オブジェクト の Size プロパティ を使用します。また、指定したファイルのサイズを取得するには、File オブジェクト の Size プロパティ を使用します。
FileSystemObject（FSO）のインスタンスを生成する方法は、ファイルシステムオブジェクト（FileSystemObject）の使い方 を参照してください。
【書式】
＜取得＞
object.Size
引数・戻り値
- object ・・・ File オブジェクト または、Folder オブジェクトを指定します。
File オブジェクトに関しては、FileSystemObject：File オブジェクトを取得（GetFile） 、Folder オブジェクトに関しては、FileSystemObject：Folder オブジェクトの取得 を参照してください。
Size プロパティ 使用例
サンプルVBAソース
|
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 |
Sub Sample_FSOSize() Dim fso As New FileSystemObject Dim myFolder As Folder Dim myFile As File Set myFile = fso.GetFile("C:\Documents\mydata3\book01.xlsx") Set myFolder = fso.GetFolder("C:\Documents\mydata3\") MsgBox myFile.Name & " のサイズ：" & vbTab & myFile.Size & " バイト" & vbCrLf & _ myFolder.Name & " フォルダのサイズ：" & vbTab & myFolder.Size & " バイト" End Sub |
実行結果
