Propiedad Application.Explorers (Outlook)

Devuelve un objeto de colección Explorers que contiene los objetos Explorer que representan todos los exploradores abiertos. Solo lectura.

Sintaxis

expresión. Explorers

expresión Variable que representa un objeto Application.

Ejemplo:

En el ejemplo siguiente de Microsoft Visual Basic para Aplicaciones (VBA) se muestra el número de ventanas abiertas del explorador.

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

El siguiente ejemplo de VBA utiliza la propiedad Count y el método Item de la colección Selection devuelta por la propiedad Selection para mostrar los remitentes de todos los elementos de correo seleccionados en el explorador que muestra la Bandeja de entrada. Para ejecutar este ejemplo, debe tener al menos un elemento de correo seleccionado en el explorador que muestra la Bandeja de entrada. Es posible que reciba un error si selecciona elementos que no sean de un elemento de correo como solicitud de tarea ya no existe la propiedad SenderName para el 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

Vea también

Objeto Application

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.