Colección Folders

Colección de todos los objetos Folder contenidos en un objeto Folder .

Comentarios

En el código siguiente se muestra cómo obtener una colección Folders y cómo recorrer en iteración la colección mediante For Each... Siguiente instrucción.

Sub ShowFolderList(folderspec)
    Dim fs, f, f1, fc, s
    Set fs = CreateObject("Scripting.FileSystemObject")
    Set f = fs.GetFolder(folderspec)
    Set fc = f.SubFolders
    For Each f1 in fc
        s = s & f1.name 
        s = s &  vbCrLf
    Next
    MsgBox s
End Sub

Vea también

• Objetos (Visual Basic para Aplicaciones)
• Referencia de la biblioteca de objetos de Office (miembros, propiedades, métodos)

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.