次の方法で共有


FreeSpace プロパティ

指定したドライブまたはネットワーク共有で使用可能な空き領域の量をユーザーに戻します。 読み取り専用です。

構文

オブジェクトFreespace

object は、常に Drive オブジェクトです。

注釈

FreeSpace プロパティによって返される値は、通常、AvailableSpace プロパティから返される値と同じです。 クォータをサポートするコンピューター システムでは、2 つの間に違いが発生することがあります。

次のコードは、 FreeSpace プロパティの使用方法を示しています。

Sub ShowFreeSpace(drvPath)
    Dim fs, d, s
    Set fs = CreateObject("Scripting.FileSystemObject")
    Set d = fs.GetDrive(fs.GetDriveName(drvPath))
    s = "Drive " & UCase(drvPath) & " - " 
    s = s & d.VolumeName  & vbCrLf
    s = s & "Free Space: " & FormatNumber(d.FreeSpace/1024, 0) 
    s = s & " Kbytes"
    MsgBox s
End Sub

関連項目

サポートとフィードバック

Office VBA またはこの説明書に関するご質問やフィードバックがありますか? サポートの受け方およびフィードバックをお寄せいただく方法のガイダンスについては、Office VBA のサポートおよびフィードバックを参照してください。