Jak otevřít konkrétní složku aplikace Outlook z aplikace Excel?
Zkoušeli jste někdy otevřít konkrétní složku Outlooku ze souboru Excel, například otevřít složku Doručená pošta, složku Kontakty nebo jinou složku? V tomto článku budu hovořit o tom, jak otevřít požadovanou složku Outlook ze sešitu aplikace Excel?
Otevřete konkrétní složku Outlooku ze souboru Excel pomocí kódu VBA
Otevřete konkrétní složku Outlooku ze souboru Excel pomocí kódu VBA
Následující kód VBA vám pomůže otevřít konkrétní složku Outlooku z listu aplikace Excel, postupujte takto:
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 následující makro do souboru Okno modulu.
Kód VBA: Otevřete konkrétní složku Outlooku ze souboru 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) skript na jakýkoli jiný název složky, který chcete otevřít.
3. Potom klepněte na tlačítko Tools > Reference v Microsoft Visual Basic pro aplikace okno, ve vyskakovacím okně Reference-Project1 v dialogovém okně zaškrtněte Objektová knihovna Microsoft Outlook možnost z nabídky Dostupné reference seznam, viz screenshot:
4. A pak klikněte OK zavřete dialogové okno a stiskněte F5 klíč ke spuštění tohoto kódu a zadaná složka aplikace Outlook bude okamžitě otevřena.
Nejlepší nástroje pro produktivitu v kanceláři
Rozšiřte své dovednosti Excel pomocí Kutools pro Excel a zažijte efektivitu jako nikdy předtím. Kutools for Excel nabízí více než 300 pokročilých funkcí pro zvýšení produktivity a úsporu času. Kliknutím sem získáte funkci, kterou nejvíce potřebujete...
Office Tab přináší do Office rozhraní s kartami a usnadňuje vám práci
- Povolte úpravy a čtení na kartách ve Wordu, Excelu, PowerPointu, Publisher, Access, Visio a Project.
- Otevřete a vytvořte více dokumentů na nových kartách ve stejném okně, nikoli v nových oknech.
- Zvyšuje vaši produktivitu o 50%a snižuje stovky kliknutí myší každý den!