Propriedade Folder.Folders (Outlook)

Retorna as pastas coleção que representa todas as pastas contidas na pasta especificada. Somente leitura.

Sintaxe

expression. Folders

Expressão Uma variável que representa um objeto Folder .

Comentários

O NameSpace objeto é a raiz de todas as pastas do namespace especificado.

Exemplo

Este exemplo Visual Basic for Applications (VBA) usa o Folders método adicionar a nova pasta denominada "My Personal Contacts" à pasta padrão Contatos.

Sub CreatePersonalContacts() 
 
 Dim myNamespace As Outlook.NameSpace 
 
 Dim myFolder As Outlook.Folder 
 
 Dim myNewFolder As Outlook.Folder 
 
 
 
 Set myNamespace = Application.GetNamespace("MAPI") 
 
 Set myFolder = myNamespace.GetDefaultFolder(olFolderContacts) 
 
 Set myNewFolder = myFolder.Folders.Add("My Personal Contacts") 
 
End Sub

Este exemplo do VBA usa o Folders método adicionar duas novas pastas na pasta tarefas. A primeira pasta, "My Notes Folder", conterá itens de anotação. Segunda pasta, "My Contacts Folder", conterá itens de contato. Se as pastas já existirem, uma caixa de mensagem informará ao usuário.

Sub CreateFolders() 
 
 Dim myNamespace As Outlook.NameSpace 
 
 Dim myFolder As Outlook.Folder 
 
 Dim myNotesFolder As Outlook.Folder 
 
 Dim myContactFolder As Outlook.Folder 
 
 
 
 Set myNamespace = Application.GetNamespace("MAPI") 
 
 Set myFolder = myNamespace.GetDefaultFolder(olFolderTasks) 
 
 On Error GoTo ErrorHandler 
 
 Set myNotesFolder = _ 
 
 myFolder.Folders.Add("My Notes Folder", olFolderNotes) 
 
 Set myContactFolder = _ 
 
 myFolder.Folders.Add("My Contacts Folder", olFolderContacts) 
 
 Exit Sub 
 
ErrorHandler: 
 
 MsgBox "Error creating the folder. The folder may already exist." 
 
 Resume Next 
 
End Sub

Confira também

Objeto Folder

Membros do objeto Folder

Suporte e comentários

Tem dúvidas ou quer enviar comentários sobre o VBA para Office ou sobre esta documentação? Confira Suporte e comentários sobre o VBA para Office a fim de obter orientação sobre as maneiras pelas quais você pode receber suporte e fornecer comentários.