Hoe een specifieke Outlook-map openen vanuit Excel?
Heeft u ooit geprobeerd om een specifieke Outlook-map te openen vanuit een Excel-bestand, zoals de map "Postvak IN", "Contactpersonen" of een andere map? In dit artikel zal ik bespreken hoe u een gewenste Outlook-map kunt openen vanuit een Excel-werkboek.
Specifieke Outlook-map openen vanuit Excel-bestand met VBA-code
Specifieke Outlook-map openen vanuit Excel-bestand met VBA-code
De volgende VBA-code kan u helpen om een specifieke Outlook-map te openen vanuit een Excel-werkblad. Volg deze stappen:
1. Druk in Excel tegelijkertijd op de toetsen "Alt" + "F11" om het venster "Microsoft Visual Basic for Applications" te openen.
2. Klik op "Invoegen" > "Module" en plak de volgende macro in het "Modulevenster".
VBA-code: Open een specifieke Outlook-map vanuit een Excel-bestand:
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
Opmerking: In bovenstaande code kunt u "Postvak IN" in het script "Set xFolder = xNameSpace.GetDefaultFolder(olFolderInbox)" wijzigen naar elke andere mapnaam die u wilt openen.
3. Klik vervolgens in het venster "Microsoft Visual Basic for Applications" op "Tools" > "References" en vink in het pop-upvenster "References-Project1" de optie "Microsoft Outlook Object Library" aan in de lijst met beschikbare referenties. Zie screenshot:
4. Klik daarna op "OK" om het dialoogvenster te sluiten en druk op de toets "F5" om de code uit te voeren. De gespecificeerde Outlook-map wordt onmiddellijk geopend.
Beste Office-productiviteitstools
Breaking News: Kutools for Outlook lanceert een gratis versie!
Ervaar de geheel nieuwe Kutools for Outlook met meer dan100 fantastische functies! Klik om nu te downloaden!
📧 E-mailautomatisering: Automatisch antwoorden (Beschikbaar voor POP en IMAP) / Schema E-mail verzenden / Automatisch CC/BCC per Regel bij Verzenden / Automatisch doorsturen (Geavanceerde regels) / Begroeting automatisch toevoegen / Meerdere ontvangers automatisch opsplitsen naar individuele E-mail...
📨 E-mailbeheer: E-mail terughalen / Scam-e-mails blokkeren op onderwerp en anderen / Duplicaat verwijderen / Geavanceerd Zoeken / Organiseer mappen...
📁 Bijlagen Pro: Batch opslaan / Batch loskoppelen / Batch comprimeren / Automatisch opslaan / Automatisch loskoppelen / Automatisch comprimeren...
🌟 Interface-magie: 😊Meer mooie en gave emoji's / Herinneren wanneer belangrijke e-mails binnenkomen / Outlook minimaliseren in plaats van afsluiten...
👍 Wonders met één klik: Antwoord Allen met Bijlagen / Anti-phishing e-mails / 🕘Tijdzone van de afzender weergeven...
👩🏼🤝👩🏻 Contacten & Agenda: Batch toevoegen van contacten vanuit geselecteerde E-mails / Contactgroep opsplitsen naar individuele groepen / Verjaardagsherinnering verwijderen...
Gebruik Kutools in je voorkeurt taal – ondersteunt Engels, Spaans, Duits, Frans, Chinees en meer dan40 andere talen!
🚀 Eén klik downloaden — Ontvang alle Office-invoegtoepassingen
Sterk aanbevolen: Kutools for Office (5-in-1)
Met één klik download je vijf installatiepakketten tegelijk — Kutools voor Excel, Outlook, Word, PowerPoint en Office Tab Pro. Klik om nu te downloaden!
- ✅ Eén-klik gemak: Download alle vijf de installaties in één actie.
- 🚀 Klaar voor elke Office-taak: Installeer de invoegtoepassingen die je nodig hebt, wanneer je ze nodig hebt.
- 🧰 Inclusief: Kutools voor Excel / Kutools for Outlook / Kutools voor Word / Office Tab Pro / Kutools voor PowerPoint