Como abrir un cartafol de Outlook específico de Excel?

Xa intentou abrir un cartafol Outlook específico do ficheiro Excel, como abrir a carpeta Caixa de entrada, a carpeta Contactos ou calquera outro cartafol? Este artigo, vou falar sobre como abrir un cartafol Outlook desexado do libro de Excel?

Abre o cartafol Outlook específico do ficheiro Excel co código VBA

Abre o cartafol Outlook específico do ficheiro Excel co código VBA

O seguinte código VBA pode axudarche a abrir un cartafol Outlook específico da folla de cálculo de Excel, faga o seguinte:

1. En Excel, manteña premido o ALT + F11 chaves para abrir a Microsoft Visual Basic para aplicacións fiestra.

2. Prema Inserir > Módulos, e pegue a seguinte macro no Ventá do módulo.

Código VBA: abre un cartafol Outlook específico do ficheiro 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

Nota: No código anterior, pode cambiar o Caixa de entrada no Establecer xFolder = xNameSpace.GetDefaultFolder (olFolderInbox) guión a calquera outro nome de cartafol que queira abrir.

3. A continuación, fai clic en ferramentas > References no Microsoft Visual Basic para aplicacións xanela, ao xurdir Referencias-Project1 caixa de diálogo, verifique Biblioteca de obxectos de Microsoft Outlook opción dende o Referencias dispoñibles caixa de lista, vexa a captura de pantalla:

4. E despois, faga clic OK para pechar a caixa de diálogo e prema F5 clave para executar este código e o cartafol de Outlook especificado abrirase de inmediato.

Ferramentas de produtividade recomendadas

Tabulación de Office

Traia páxinas útiles para Excel e outro software de Office, como Chrome, Firefox e Internet Explorer novo.

Kutools para Excel