Objeto UserDefinedProperties (Outlook)

Contém um conjunto de objetos UserDefinedProperty que representam as propriedades definidas pelo usuário de um objeto Folder.

Comentários

Os membros do conjunto UserDefinedProperties correspondem aos campos em campos definidos pelo usuário na pasta que obtém na caixa de diálogo Mostrar campos.

Use a propriedade UserDefinedProperties para recuperar o objeto UserDefinedProperties de um objeto Folder.

Use o método Add para definir e adicionar uma propriedade definida pelo usuário e o método Remove para remover uma propriedade definida pelo usuário existente do, conjunto UserDefinedProperties. Use o método Item para recuperar por nome ou o índice ou o método Find para localizar e recuperar pelo nome, um objeto UserDefinedProperty da coleção UserDefinedProperties. Use o método Refresh para recarregar o conjunto UserDefinedProperties do repositório.

Conjunto UserDefinedProperties contém apenas as definições das propriedades definidas pelo usuário, que se aplicam a todos os itens do Outlook contidos na pasta. Para recuperar ou alterar os valores de propriedade definida pelo usuário para um item do Outlook nessa pasta, use a propriedade UserProperties do item do Outlook, como um objeto MailItem, para recuperar a coleção UserProperties para esse item. Em seguida, você pode usar o objeto UserProperty para a propriedade apropriada de definidas pelo usuário para recuperar ou alterar o valor dessa propriedade definida pelo usuário para o item do Outlook.

Exemplo

O seguinte exemplo Visual Basic for Applications (VBA) usa o método Add para criar e adicionar vários objetos UserDefinedProperty à pasta Inbox padrão.

Sub AddStatusProperties() 
 
 Dim objNamespace As NameSpace 
 
 Dim objFolder As Folder 
 
 Dim objProperty As UserDefinedProperty 
 
 
 
 ' Obtain a Folder object reference to the 
 
 ' Inbox default folder. 
 
 Set objNamespace = Application.GetNamespace("MAPI") 
 
 Set objFolder = objNamespace.GetDefaultFolder(olFolderInbox) 
 
 
 
 ' Add five user-defined properties, used to identify and 
 
 ' track customer issues. 
 
 With objFolder.UserDefinedProperties 
 
 Set objProperty = .Add("Issue?", olYesNo, olFormatYesNoIcon) 
 
 Set objProperty = .Add("Issue Research Time", olDuration) 
 
 Set objProperty = .Add("Issue Resolution Time", olDuration) 
 
 Set objProperty = .Add("Customer Follow-Up", olYesNo, olFormatYesNoYesNo) 
 
 Set objProperty = .Add("Issue Closed", olYesNo, olFormatYesNoYesNo) 
 
 End With 
 
End Sub 
 

Métodos

Nome
Adicionar
Find
Item
Refresh
Remove

Propriedades

Nome
Aplicativo
Classe
Count
Responsável
Sessão

Confira também

Referência de modelo de objeto do Outlook

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.