Как открыть нужный файл Excel прямо из Outlook?

Если вам часто приходится использовать определённый файл Excel во время работы в Outlook, каждый раз приходится открывать его заново. Существует ли быстрый и простой способ открыть нужную книгу прямо из Outlook? В этой статье я покажу, как легко решить эту задачу.

Открытие определённого файла Excel из Outlook с помощью кода VBA

---

Открытие определённого файла Excel из Outlook с помощью кода VBA

Вы можете воспользоваться приведённым ниже кодом VBA, чтобы открыть нужный файл книги по умолчанию. Выполните следующие действия:

1. В Outlook нажмите сочетание клавиш «ALT» + «F11», чтобы открыть окно Microsoft Visual Basic for Applications.

2. Затем выберите «Вставка» > «Модуль» и вставьте приведённый ниже код в окно модуля.

Код VBA: Открытие определённого файла Excel из Outlook:

Public Sub OpenSpecificExcelWorkbook()
    Dim xExcelFile As String
    Dim xExcelApp As Excel.Application
    Dim xWb As Excel.Workbook
    Dim xWs As Excel.Worksheet
   Dim xExcelRange As Excel.Range
    xExcelFile = "C:\Users\DT168\Desktop\split document\kto-data.xlsx"
    Set xExcelApp = CreateObject("Excel.Application")
    Set xWb = xExcelApp.Workbooks.Open(xExcelFile)
    Set xWs = xWb.Sheets(1)
    xWs.Activate
    Set xExcelRange = xWs.Range("A1")
    xExcelRange.Activate
    xExcelApp.Visible = True
End Sub

Примечание: В приведённом выше коде замените путь к файлу Excel «C:\Users\DT168\Desktop\split document\kto-data.xlsx» на свой собственный.

3. Затем, не покидая окно «Microsoft Visual Basic for Applications», выберите «Сервис» > «Ссылки», чтобы открыть диалоговое окно «Ссылки – Project1», и установите флажок рядом с пунктом «Microsoft Excel Object Library» в списке «Доступные ссылки». См. снимок экрана:

4. После этого нажмите кнопку «ОК», чтобы закрыть диалоговое окно, а затем сохраните и закройте окно кода. Теперь добавьте этот код на «Панель быстрого доступа».

5. В главном интерфейсе Outlook нажмите значок «Настроить панель быстрого доступа» и выберите «Другие команды». См. снимок экрана:

6. В диалоговом окне «Параметры Outlook»:

• (1.) Выберите «Макросы» в раскрывающемся списке «Выбрать команды из»;
• (2.) Затем выберите имя кода VBA, который вы только что вставили;
• (3.) Нажмите кнопку «Добавить», чтобы включить код в список настройки панели быстрого доступа.

7. После этого значок макроса появится на «Панели быстрого доступа», как показано на следующем снимке экрана. С этого момента при нажатии на эту кнопку указанный вами файл Excel будет открываться мгновенно.