Jak otevřít konkrétní složku aplikace Outlook z aplikace Excel?

Pokusili jste se někdy otevřít konkrétní složku aplikace Outlook z aplikace Excel, například otevření složky Doručená pošta, složky Kontakty nebo jiné složky? Tento článek budu hovořit o tom, jak otevřít požadovanou složku aplikace Outlook ze sešitu aplikace Excel?

Otevřete konkrétní složku aplikace Outlook z souboru aplikace Excel s kódem VBA

Otevřete konkrétní složku aplikace Outlook z souboru aplikace Excel s kódem VBA

Následující kód VBA vám může pomoci otevřít konkrétní složku aplikace Outlook z listu aplikace Excel, proveďte následující postup:

1. V aplikaci Excel podržte klávesu ALT + F11 klávesy pro otevření Microsoft Visual Basic pro aplikace okno.

2, klikněte Vložit > Modula vložte do makra následující makro Okno modulu.

Kód VBA: Otevřete konkrétní složku aplikace Outlook ze souboru aplikace Excel:

Sub OpenOutlookFolder()
    Dim xOutlookApp As Outlook.Application
    Dim xNameSpace As Outlook.Namespace
    Dim xFolder As Outlook.Folder
    Dim xFolderType As OlDefaultFolders
    On Error Resume Next
    Set xOutlookApp = New Outlook.Application
    Set xNameSpace = xOutlookApp.Session
    Set xFolder = xNameSpace.GetDefaultFolder(olFolderInbox)
    xFolder.Display
    Set xFolder = Nothing
    Set xNameSpace = Nothing
    Set xOutlookApp = Nothing
    Exit Sub
End Sub

Poznámka: Ve výše uvedeném kódu můžete změnit Doručené v Nastavit xFolder = xNameSpace.GetDefaultFolder (olFolderInbox) skriptu na libovolný jiný název složky, který chcete otevřít.

3. Potom klepněte na tlačítko nářadí > Reference v Microsoft Visual Basic pro aplikace okno, ve vyskočil Odkazy-Project1 dialogové okno, zkontrolujte Knihovna objektů aplikace Microsoft Outlook možnost z nabídky Dostupné odkazy seznam, viz screenshot:

4. A pak klepněte na tlačítko OK zavřete dialogové okno a stiskněte tlačítko F5 klávesu pro spuštění tohoto kódu a zadaná složka aplikace Outlook se otevře okamžitě.

Doporučené nástroje pro produktivitu

Karta Office

Přiveďte praktické karty do aplikace Excel a jiného softwaru Office, stejně jako Chrome, Firefox a nový Internet Explorer.

Kutools pro Excel