Przejdź do głównej zawartości

Jak otworzyć określony plik Excela z Outlooka?

Jeśli chcesz często używać określonego pliku Excela podczas pracy w Outlooku, musisz otwierać ten plik od czasu do czasu. Czy istnieje szybki i łatwy sposób na otwarcie określonego pliku skoroszytu z programu Outlook? W tym artykule omówię, jak go rozwiązać.

Otwórz określony plik Excela z Outlooka za pomocą kodu VBA


Otwórz określony plik Excela z Outlooka za pomocą kodu VBA

Możesz użyć następującego kodu VBA, aby otworzyć domyślny plik skoroszytu według potrzeb, wykonaj następujące czynności:

1. W programie Outlook przytrzymaj ALT + F11 klawisze, aby otworzyć Microsoft Visual Basic for Applications okno.

2. Następnie kliknij wstawka > Modułi wklej następujący kod w Moduł Okno.

Kod VBA: Otwórz określony plik Excel z Outlooka:

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

Note: W powyższym kodzie należy zmienić ścieżkę do pliku Excela: C: \ Users \ DT168 \ Desktop \ split document \ kto-data.xlsx do własnego.

3. A potem nadal w Microsoft Visual Basic for Applications okno, kliknij Tools > Referencje , aby przejść do Referencje-projekt 1 okno dialogowe i zaznacz Biblioteka obiektów programu Microsoft Excel opcja z Dostępne referencje pole listy, zobacz zrzut ekranu:

doc otwórz konkretny program Excel 1

4. Następnie kliknij OK aby wyjść z okna dialogowego, zapisz i zamknij okno kodu. Teraz powinieneś dodać ten kod do Pasek narzędzi szybkiego dostępu.

5. W głównym interfejsie Outlooka kliknij Dostosuj pasek narzędzi Szybki dostęp ikonę i wybierz Więcej poleceńzobacz zrzut ekranu:

doc otwórz konkretny program Excel 2

6. W Opcje programu Outlook Okno dialogowe:

  • (1.) Wybierz Makra z Wybierz polecenia z Lista rozwijana;
  • (2.) A następnie wybierz nazwę kodową VBA, którą właśnie wstawiłeś;
  • (3.) Kliknij Dodaj przycisk, aby dodać kod do pliku Dostosuj pasek narzędzi Szybki dostęp skrzynka na listy.

doc otwórz konkretny program Excel 3

7. Następnie ikona makra jest wyświetlana w Pasek narzędzi szybkiego dostępu jak pokazano na poniższym zrzucie ekranu. Od tej chwili po kliknięciu tego przycisku określony plik Excel zostanie otwarty od razu.

doc otwórz konkretny program Excel 4


Najlepsze narzędzia biurowe

Kutools dla programu Outlook - Ponad 100 zaawansowanych funkcji, które usprawnią Twoje perspektywy

🤖 Asystent poczty AI: Natychmiastowe profesjonalne e-maile z magią AI — genialne odpowiedzi jednym kliknięciem, doskonały ton, biegła znajomość wielu języków. Zmień e-mailing bez wysiłku! ...

📧 Automatyzacja poczty e-mail: Poza biurem (dostępne dla POP i IMAP)  /  Zaplanuj wysyłanie wiadomości e-mail  /  Automatyczne CC/BCC według reguł podczas wysyłania wiadomości e-mail  /  Automatyczne przewijanie (Zasady zaawansowane)   /  Automatyczne dodawanie powitania   /  Automatycznie dziel wiadomości e-mail od wielu odbiorców na pojedyncze wiadomości ...

📨 Zarządzanie e-mail: Łatwe przywoływanie e-maili  /  Blokuj oszukańcze wiadomości e-mail według tematów i innych  /  Usuń zduplikowane wiadomości e-mail  /  Wiecej opcji  /  Konsoliduj foldery ...

📁 Załączniki ProZapisz zbiorczo  /  Odłącz partię  /  Kompresuj wsadowo  /  Automatyczne zapisywanie   /  Automatyczne odłączanie  /  Automatyczna kompresja ...

🌟 Magia interfejsu: 😊Więcej ładnych i fajnych emotikonów   /  Zwiększ produktywność programu Outlook dzięki widokom na kartach  /  Zminimalizuj program Outlook zamiast go zamykać ...

>> Cuda jednym kliknięciem: Odpowiedz wszystkim, dodając przychodzące załączniki  /   E-maile chroniące przed phishingiem  /  🕘Pokaż strefę czasową nadawcy ...

👩🏼‍🤝‍👩🏻 Kontakty i kalendarz: Grupowe dodawanie kontaktów z wybranych e-maili  /  Podziel grupę kontaktów na pojedyncze grupy  /  Usuń przypomnienia o urodzinach ...

O Cechy 100 Poczekaj na eksplorację! Kliknij tutaj, aby dowiedzieć się więcej.

 

 

Comments (6)
No ratings yet. Be the first to rate!
This comment was minimized by the moderator on the site
7行目のファイルのフルパスを修正して使っていますが、読み取り専用で開いてしまい、データを修正した後上書き保存ができませんでした。

ネットワークフォルダにあるエクセルの場合は、読み取り専用で開いてしまうのでしょうか?
Windowsのプレビューウインドウも含めて、Excelアプリケーションは一切開いていない状態でも同様に読み取り専用で開いてしまいます。
何か対処法があれば教えていただければ幸いです。

ちなみに、Outlook、Excelともに2019環境です。
This comment was minimized by the moderator on the site
Hello,
The code works well in my Outlook, and the Excel file opens normally, not open with read only mode.

You can insert your Excel file here if you don't mind, so that I can check the code.

Thank you!
This comment was minimized by the moderator on the site
Outlook rejects the code immediately with an error. "Compile Error. User defined type not defined." And it zeroes in on "Dim xExcelApp As Excel.Application" as the problem. I literally just copied and pasted it as is into the editor and tried to run it and it fails out immediately.
This comment was minimized by the moderator on the site
Did you enable the microsoft excel library first?
This comment was minimized by the moderator on the site
This works pretty well!

Could you help me with the line of code in addition to it on how to close the workbook without saving changes.
This comment was minimized by the moderator on the site
Or you can run .bat file:


.bat:
@echo off
"C:\Program Files (x86)\Microsoft Office\Office12\EXCEL.EXE" "D:\your_file.xlsx"

and VBA:
Set WshShell = CreateObject("WScript.Shell")
WshShell.Run chr(34) & "D:\your_BAT.bat" & Chr(34), 0
Set WshShell = Nothing



https://www.winhelponline.com/blog/run-bat-files-invisibly-without-displaying-command-prompt/
There are no comments posted here yet
Please leave your comments in English
Posting as Guest
×
Rate this post:
0   Characters
Suggested Locations