Compartilhar via


Propriedade Application.Explorers (Outlook)

Retorna um objeto da coleção Explorers que contém os objetos Explorer que representam todos os explorers abertos. Somente leitura.

Sintaxe

expression. Explorers

expressão Uma variável que representa um Aplicativo objeto.

Exemplo

O seguinte exemplo do Microsoft Visual Basic for Applications (VBA) exibe o número de janelas do Explorer que estão abertas.

Private Sub CountExplorers() 
 
 MsgBox "There are " & _ 
 
 Application.Explorers.Count & " Explorers." 
 
End Sub

O exemplo VBA a seguir usa a propriedade Count e o método Item da coleção Selection retornado pela propriedade Selection para exibir os remetentes de todos os itens de email selecionados no explorer que exibe a caixa de entrada. Para executar esse exemplo, você precisará ter pelo menos um item de email selecionado no explorer exibindo a caixa de entrada. Você pode receber um erro se você selecionar itens que não seja um item de email, como a solicitação de tarefa, como a propriedade SenderName não existe para um objeto TaskRequestItem.

Sub GetSelectedItems() 
 
 Dim myOlExp As Outlook.Explorer 
 
 Dim myOlSel As Outlook.Selection 
 
 Dim MsgTxt As String 
 
 Dim x As Integer 
 
 
 
 MsgTxt = "You have selected items from: " 
 
 Set myOlExp = Application.Explorers.Item(1) 
 
 If myOlExp = "Inbox" Then 
 
 Set myOlSel = myOlExp.Selection 
 
 For x = 1 To myOlSel.Count 
 
 MsgTxt = MsgTxt & myOlSel.Item(x).SenderName & ";" 
 
 Next x 
 
 MsgBox MsgTxt 
 
End If 
 
End Sub

Confira também

Objeto de Aplicativo

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.