Как да отворя конкретна папка на Outlook от Excel?
Опитвали ли сте някога да отворите конкретна папка на Outlook от файл на Excel, като например отваряне на папка Входящи, папка Контакти или друга папка? В тази статия ще говоря за това как да отворя желана папка на Outlook от работна книга на Excel?
Отворете конкретна папка на Outlook от Excel файл с VBA код
Отворете конкретна папка на Outlook от Excel файл с VBA код
Следният VBA код може да ви помогне да отворите конкретна папка на Outlook от работен лист на Excel, моля, направете следното:
1. В Excel задръжте натиснат ALT + F11 за да отворите Microsoft Visual Basic за приложения прозорец.
2. Щракнете Поставете > Модулии поставете следния макрос в Прозорец на модула.
VBA код: Отворете конкретна папка на Outlook от 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
Забележка: В горния код можете да промените Входящи в Задайте xFolder = xNameSpace.GetDefaultFolder(olFolderInbox) скрипт към всяко друго име на папка, което искате да отворите.
3, След това кликнете върху Инструменти > Препратки в Microsoft Visual Basic за приложения прозорец, в изскочил Референции-Проект1 диалогов прозорец, проверете Обектна библиотека на Microsoft Outlook опция от Налични препратки списъчно поле, вижте екранна снимка:
4. И след това щракнете OK за да затворите диалоговия прозорец и натиснете F5 за изпълнение на този код и указаната папка на Outlook ще бъде отворена незабавно.
Най-добрите инструменти за продуктивност в офиса
Усъвършенствайте уменията си за Excel с Kutools за Excel и изпитайте ефективност, както никога досега. Kutools за Excel предлага над 300 разширени функции за повишаване на производителността и спестяване на време. Щракнете тук, за да получите функцията, от която се нуждаете най-много...
Раздел Office Внася интерфейс с раздели в Office и прави работата ви много по-лесна
- Разрешете редактиране и четене с раздели в Word, Excel, PowerPoint, Publisher, Access, Visio и Project.
- Отваряйте и създавайте множество документи в нови раздели на един и същ прозорец, а не в нови прозорци.
- Увеличава вашата производителност с 50% и намалява стотици кликвания на мишката за вас всеки ден!