Almacena el objeto (Outlook)
Conjunto de objetos Store que representa todos los almacenes disponibles en el perfil actual.
Comentarios
Use los objetos Stores y Store para enumerar todas las carpetas y carpetas de búsqueda de todos los almacenes de la sesión actual. Para obtener más información sobre cómo almacenar elementos de Outlook en carpetas y almacenes, vea Almacenar elementos de Outlook.
Ejemplo:
El ejemplo siguiente de Microsoft Visual Basic para Aplicaciones (VBA) enumera todas las carpetas de todos los almacenes de la sesión actual:
Sub EnumerateFoldersInStores()
Dim colStores As Outlook.Stores
Dim oStore As Outlook.Store
Dim oRoot As Outlook.Folder
On Error Resume Next
Set colStores = Application.Session.Stores
For Each oStore In colStores
Set oRoot = oStore.GetRootFolder
Debug.Print (oRoot.FolderPath)
EnumerateFolders oRoot
Next
End Sub
Private Sub EnumerateFolders(ByVal oFolder As Outlook.Folder)
Dim folders As Outlook.folders
Dim Folder As Outlook.Folder
Dim foldercount As Integer
On Error Resume Next
Set folders = oFolder.folders
foldercount = folders.Count
'Check if there are any folders below oFolder
If foldercount Then
For Each Folder In folders
Debug.Print (Folder.FolderPath)
EnumerateFolders Folder
Next
End If
End Sub
Eventos
| Nombre |
|---|
| BeforeStoreRemove |
| StoreAdd |
Métodos
| Nombre |
|---|
| Item |
Propiedades
| Nombre |
|---|
| Aplicación |
| Class |
| Count |
| Parent |
| Session |
Consulte también
Referencia del modelo de objetos de Outlookalmacena miembros de objeto
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.