Cookies ни помагат да постигнем нашите услуги. С помощта на нашите услуги, Вие се съгласявате да използвате нашите бисквитки.
Съвет: Други езици са преведени от Google. Можете да посетите English версия на тази връзка.
Влизане
x
or
x
x
Регистрирам
x

or

Как да отворите конкретна Outlook папка от Excel?

Опитали ли сте някога да отворите конкретна Outlook папка от Excel файл, като например отваряне на папката Inbox, Contacts папка или друга папка? Тази статия, аз ще говоря за това как да отворите желаната папка 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 за приложения прозореца, изскочил Позоваването-Project1 диалогов прозорец, проверете Библиотека с обекти на Microsoft Outlook опция от Налични референции , вижте екранната снимка:

папката за откриване на прозорци 1

4, И тогава кликнете върху OK за да затворите диалоговия прозорец и натиснете F5 ключ за стартиране на този код и определената папка на Outlook ще бъде отворена незабавно.



Препоръчителни инструменти за производителност

Таб на Office

златна звезда1 Носете удобни раздели в Excel и друг софтуер на Office, също като Chrome, Firefox и новия Internet Explorer.

Kutools за Excel

златна звезда1 Невероятно! Увеличете производителността си в 5 минути. Не се нуждаете от специални умения, освен два часа всеки ден!

златна звезда1 300 Нови функции за Excel, Направете Excel много лесен и мощен:

  • Обединяване на клетки / редове / колони без загуба на данни.
  • Комбинирайте и консолидирайте няколко листа и работни книги.
  • Сравняване на диапазони, копиране на множество диапазони, конвертиране на текст към дата, преобразуване на единица и валута.
  • Брой по цветове, междинни мерни единици за пейджинг, разширен сортиране и супер филтър,
  • Още Избор / Вмъкване / Изтриване / Текст / Форматиране / Връзка / Коментар / Работни книги / Работни листове Инструменти ...

Изстрел на екрана на Kutools за Excel

Say something here...
symbols left.
You are guest ( Sign Up? )
or post as a guest, but your post won't be published automatically.
Loading comment... The comment will be refreshed after 00:00.

Be the first to comment.