如何從 Excel 開啟特定的 Outlook 資料夾?
您是否曾經嘗試過從 Excel 文件中開啟特定的 Outlook 資料夾,例如「收件匣」資料夾、「聯絡人」資料夾或任何其他資料夾?在本文中,我將介紹如何從 Excel 工作簿中開啟所需的 Outlook 資料夾。
使用 VBA 程式碼從 Excel 文件開啟特定的 Outlook 資料夾
使用 VBA 程式碼從 Excel 文件開啟特定的 Outlook 資料夾
以下 VBA 程式碼可以幫助您從 Excel 工作表中開啟特定的 Outlook 資料夾,請按照以下步驟操作:
1. 在 Excel 中,按住「Alt」+「F11」鍵以開啟「Microsoft Visual Basic for Applications」視窗。
2. 點擊「插入」>「模組」,並將以下巨集貼到「模組視窗」中。
VBA 程式碼:從 Excel 文件開啟特定的 Outlook 資料夾:
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
注意:在上述程式碼中,您可以將「Set xFolder = xNameSpace.GetDefaultFolder(olFolderInbox)」腳本中的「Inbox」更改為您想要開啟的任何其他資料夾名稱。
3. 接著,在「Microsoft Visual Basic for Applications」視窗中點擊「工具」>「參考」,然後在彈出的「參考-Project1」對話框中,從「可用的參考」列表框中勾選「Microsoft Outlook Object Library」選項。參見截圖:
4. 然後,點擊「確定」關閉對話框,並按下「F5」鍵執行此程式碼,指定的 Outlook 資料夾將立即被開啟。
最佳 Office 生產力工具
最新消息:Kutools for Outlook 推出免費版本!
體驗全新 Kutools for Outlook,擁有100+ 強大功能!立即下載!
🤖 Kutools AI :運用先進 AI 技術,輕鬆處理郵件,包括答覆、摘要、優化、擴寫、翻譯與撰寫郵件。
📧 郵件自動化:自動回覆(支援 POP 和 IMAP) / 計劃發送郵件 / 發送郵件時根據規則自動抄送密送 / 自動轉發(高級規則) / 自動新增問候語 / 自動將多收件人郵件分割為個別郵件 ...
📨 郵件管理:撤回郵件 /依主題等條件阻擋詐騙郵件 / 刪除重複郵件 / 高級搜索 / 整合文件夾 ...
📁 附件專業版:批次保存 / 批次拆離 / 批次壓縮 / 自動保存 / 自動拆離 / 自動壓縮 ...
🌟 介面魔法:😊更多精美酷炫表情符號 /重要郵件來臨提醒 / 最小化 Outlook 而非關閉 ...
👍 一鍵神技:帶附件全部答復 /反釣魚郵件 / 🕘顯示發件人時區 ...
👩🏼🤝👩🏻 聯絡人與日曆:批次從選中郵件新增聯絡人 / 將聯絡人組分割為多個組 / 移除生日提醒 ...
以您偏好的語言使用 Kutools —— 支援英語、西班牙語、德語、法語、中文及40 多種其他語言!
只需一鍵即可立即啟用 Kutools for Outlook。立即下載,提升您的效率!

