StartDownloadsServiceBeispieleWorkshopsKontakt DeutschEnglish
 
Beispiele
Allgemein
Outlook®
 
Awarded by
Microsoft since 2005:
mvp logo
VBOffice Info
Besucher1832042
Aufrufe6880068
Links
Impressum
Datenschutz
Kontakt
Ordner: Pfad ermitteln
Autor: Michael BauerHomepage
Datum: 08.06.2008Zugriffe: 48047
  
Beschreibung

Wenn Sie eine Suche nach E-Mails über mehrere Ordner durchführen, kann Outlook zwar den Namen des Ordners nennen, in dem eine E-Mail gefunden wurde. Wenn Sie aber mehrere Ordner mit dem gleichen Namen haben, nützt Ihnen das wenig.

Dieses Beispiel zeigt den ganzen Pfad und bietet die Möglichkeit, gleich zum betreffenden Ordner zu wechseln.

Wenn Sie eine direkte Suche durchgeführt haben, können Sie eine E-Mail im Ergebnis im Ordner markieren und das Makro aufrufen; wenn Sie dagegen die erweiterte Suche benutzt haben, müssen Sie die E-Mail zuerst öffnen.

Kopieren Sie den Code bitte wie immer ins Modul "DieseOutlookSitzung". Sie können das Makro entweder über ALT+F8 aufrufen, oder Sie passen die Symbolleiste an und ziehen den Namen des Makros darauf.

Public Sub GetItemsFolderPath()
  Dim obj As Object
  Dim F As Outlook.MAPIFolder
  Dim Msg$
  Set obj = Application.ActiveWindow
  If TypeOf obj Is Outlook.Inspector Then
    Set obj = obj.CurrentItem
  Else
    Set obj = obj.Selection(1)
  End If
  Set F = obj.Parent
  Msg = "The path is: " & F.FolderPath & vbCrLf
  Msg = Msg & "Switch to the folder?"
  If MsgBox(Msg, vbYesNo) = vbYes Then
    Set Application.ActiveExplorer.CurrentFolder = F
  End If
End Sub
 
 

ReplyAll warnt Sie, bevor Sie unbeabsichtigt allen Empfängern einer E-Mail antworten oder wenn Sie ein vertraulicher BCC-Empfänger der E-Mail ... [weiter]

 

Blitzschneller Zugriff auf die Hauptkategorienliste, gemeinsame Kategorien im Netzwerk, eine Erinnerungsfunktion ... [weiter]

 

SAM legt automatisch Absender, Signatur und Speicherort für gesendete Mails fest, z.B. anhand der ... [weiter]

 

OLKeeper verhindert zuverlässig, dass Mitarbeiter Outlook schließen und dadurch Termine oder E-Mails ... [weiter]

So entgeht Ihnen kein Auftrag mehr:
Telefonservice und Sekretariatsservice