This documentation is archived and is not being maintained.

ActiveExplorer Method

Office 2003

Returns the topmost Explorer object on the desktop. If no explorer is active, returns Nothing. Use this method to return the Explorer object that the user is most likely viewing. This method is also useful for determining when there is no active explorer, so a new one can be opened.


expression    Required. An expression that returns an Application object.


The following Microsoft Visual Basic/Visual Basic for Applications (VBA) example uses the Count property and Item method of the Selection collection returned by the Selection property to display the senders of all mail items selected in the active explorer window. To run this example, you need to have at least one mail item selected in the active Explorer window.

Note  You might receive an error if you select items other than a mail item such as task request as the SenderName property does not exist for a TaskRequestItem object.

Sub GetSelectedItems()
	Dim myOlApp As New Outlook.Application
	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 = myOlApp.ActiveExplorer
	Set myOlSel = myOlExp.Selection
	For x = 1 To myOlSel.Count
		MsgTxt = MsgTxt & myOlSel.Item(x).SenderName & ";"
	Next x
	MsgBox MsgTxt
End Sub

Applies to | Application Object