Application.ActiveExplorer method (Outlook)

Gibt das oberste Explorer-Objekt auf dem Desktop zurück.

Syntax

Ausdruck. ActiveExplorer

expression Eine Variable, die ein Application-Objekt darstellt.

Rückgabewert

Ein Explorer-Objekt, das den obersten Explorer auf dem Desktop darstellt. Gibt Nothing zurück, wenn kein Explorer aktiv ist.

HinwBemerkungeneise

Verwenden Sie diese Methode, um das Explorer -Objekt zurückzugeben, das der Benutzer wahrscheinlich anzeigt. Diese Methode ist darüber hinaus nützlich, um festzustellen, ob kein aktiver Explorer vorhanden ist, damit ein neuer geöffnet werden kann.

Beispiel

Im folgenden Beispiel für Microsoft Visual Basic for Applications (VBA) werden die Count-Eigenschaft und die Item-Methode der Selection-Auflistung verwendet, die von der Selection-Eigenschaft zurückgegeben werden, um die Absender aller im aktiven Explorer-Fenster ausgewählten E-Mail-Elemente anzuzeigen. Um dieses Beispiel auszuführen, muss mindestens eine E-Mail-Nachricht im aktiven Explorer-Fenster markiert sein.

Hinweis

Möglicherweise wird ein Fehler angezeigt, wenn Sie Elemente, wie z. B. eine Aufgabenanfrage, markieren, die keine E-Mail-Nachrichten sind, da für ein TaskRequestItem-Objekt keine SenderName-Eigenschaft vorhanden ist.

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

Siehe auch

Application-Objekt

Support und Feedback

Haben Sie Fragen oder Feedback zu Office VBA oder zu dieser Dokumentation? Unter Office VBA-Support und Feedback finden Sie Hilfestellung zu den Möglichkeiten, wie Sie Support erhalten und Feedback abgeben können.