Método DistListItem.GetMember (Outlook)
Retorna um objeto Recipient que representa um membro de uma lista de distribuição.
Sintaxe
expression. GetMember (Índice)
Expressão Uma variável que representa um objeto DistListItem .
Parâmetros
| Nome | Obrigatório/Opcional | Tipo de dados | Descrição |
|---|---|---|---|
| Índice | Obrigatório | Long | O número de índice do membro a ser recuperado. |
Valor de retorno
Um objeto Recipient que representa o membro especificado.
Exemplo
Esse exemplo do Microsoft Visual Basic for Applications (VBA) localiza cada lista de distribuição na pasta padrão Contatos e determina se a lista contém o usuário atual.
Sub DisplayYourDLNames()
Dim myNameSpace As Outlook.NameSpace
Dim myFolder As Outlook.Folder
Dim myDistList As Outlook.DistListItem
Dim myFolderItems As Outlook.Items
Dim x As Integer
Dim y As Integer
Dim iCount As Integer
Set myNameSpace = Application.GetNamespace("MAPI")
Set myFolder = myNameSpace.GetDefaultFolder(olFolderContacts)
Set myFolderItems = myFolder.Items
iCount = myFolderItems.Count
For x = 1 To iCount
If TypeName(myFolderItems.Item(x)) = "DistListItem" Then
Set myDistList = myFolderItems.Item(x)
For y = 1 To myDistList.MemberCount
If myDistList.GetMember(y).Name = myNameSpace.CurrentUser.Name Then
MsgBox "Your are a member of " & myDistList.DLName
End If
Next y
End If
Next x
End Sub
Confira também
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.