機能と数式 | VBA | セミナー | オンラインソフト | お問い合わせ | その他
Top > Excel > VBA > FileSystemObject

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



【書式】
Folder.Size

フォルダ内に存在する全てのファイルの合計サイズを返します。
Sub test50()
    Dim FSO As Object
    Set FSO = CreateObject("Scripting.FileSystemObject")
    ''C:\Workフォルダ内の全ファイルの合計サイズを表示します
    MsgBox FSO.GetFolder("C:\Work").Size
    Set FSO = Nothing
End Sub



このエントリーをはてなブックマークに追加