Propiedad AvailableSpace
Devuelve la cantidad de espacio disponible para el usuario en un recurso compartido de red o en la unidad especificada.
Sintaxis
objeto . AvailableSpace
El objeto siempre es un objeto Drive .
Comentarios
El valor devuelto por la propiedad AvailableSpace suele ser el mismo que el devuelto por la propiedad FreeSpace . No obstante, pueden detectarse diferencias entre los valores de los equipos compatibles con cuotas.
En el código siguiente se muestra el uso de la propiedad AvailableSpace .
Sub ShowAvailableSpace(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 & "Available Space: " & FormatNumber(d.AvailableSpace/1024, 0)
s = s & " Kbytes"
MsgBox s
End Sub
Vea también
Soporte técnico y comentarios
¿Tiene preguntas o comentarios sobre VBA para Office o esta documentación? Vea Soporte técnico y comentarios sobre VBA para Office para obtener ayuda sobre las formas en las que puede recibir soporte técnico y enviar comentarios.