Compartir a través de


Propiedad IsRootFolder

Devuelve True si la carpeta especificada es la carpeta raíz; de lo contrario, devuelve False.

Sintaxis

objeto . IsRootFolder

El objeto siempre es un objeto Folder .

Comentarios

En el código siguiente se muestra el uso de la propiedad IsRootFolder .

Dim fs
Set fs = CreateObject("Scripting.FileSystemObject")
Sub DisplayLevelDepth(pathspec)
    Dim f, n
    Set f = fs.GetFolder(pathspec)
    If f.IsRootFolder Then
        MsgBox "The specified folder is the root folder."
    Else
        Do Until f.IsRootFolder
            Set f = f.ParentFolder
            n = n + 1
        Loop
        MsgBox "The specified folder is nested " & n & " levels deep."
    End If
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.