Hoppa till huvudinnehåll

Hur öppnar jag en specifik Excel-fil från Outlook?

Om du vill använda en viss Excel-fil ofta när du arbetar på Outlook, måste du öppna den här filen då och då. Finns det något snabbt och enkelt sätt för dig att öppna en specifik arbetsbokfil från Outlook? Den här artikeln kommer jag att prata om hur man löser det.

Öppna en specifik Excel-fil från Outlook med VBA-kod


Öppna en specifik Excel-fil från Outlook med VBA-kod

Du kan använda följande VBA-kod för att öppna en standardarbetsfil som du behöver, gör så här:

1. I Outlook håller du ned ALT + F11 nycklar för att öppna Microsoft Visual Basic för applikationer fönster.

2. Klicka sedan Insert > Modulernaoch klistra in följande kod i Modulerna Fönster.

VBA-kod: Öppna en specifik Excel-fil från 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

Anmärkningar: I ovanstående kod bör du ändra Excel-filsökvägen: C: \ Användare \ DT168 \ Skrivbord \ delat dokument \ kto-data.xlsx till din egen.

3. Och sedan, fortfarande i Microsoft Visual Basic för applikationer fönstret klickar verktyg > Referensprojekt för att gå till Referenser-projekt1 dialogrutan och kontrollera Microsoft Excel-objektbibliotek alternativ från Tillgängliga referenser listruta, se skärmdump:

doc öppna specifikt excel 1

4. Klicka sedan OK för att stänga dialogrutan, spara och stäng kodfönstret. Nu bör du lägga till den här koden i Snabbåtkomstverktygsfält.

5. Klicka på i huvudgränssnittet i Outlook Anpassa snabbåtkomstverktygsfältet ikonen och välj Fler kommandon, se skärmdump:

doc öppna specifikt excel 2

6. I Outlook-Val dialog ruta:

  • (1.) Välj Makron från Välj kommandon från rullgardinsmeny;
  • (2.) Och välj sedan VBA-kodnamnet som du har infogat just nu;
  • (3.) Klicka på Lägg till för att lägga till koden i Anpassa snabbåtkomstverktygsfältet listrutan.

doc öppna specifikt excel 3

7. Och sedan visas en makroikon i Snabbåtkomstverktygsfält som följande skärmdump visas. Från och med nu, när du klickar på den här knappen, öppnas din angivna Excel-fil direkt.

doc öppna specifikt excel 4


Bästa kontorsproduktivitetsverktyg

Kutools för Outlook - Över 100 kraftfulla funktioner för att överladda din Outlook

🤖 AI Mail Assistant: Instant proffs-e-postmeddelanden med AI-magi – ett klick för geniala svar, perfekt ton, flerspråkig behärskning. Förvandla e-post utan ansträngning! ...

📧 Email Automation: Frånvaro (tillgänglig för POP och IMAP)  /  Schemalägg Skicka e-post  /  Auto CC/BCC enligt regler när du skickar e-post  /  Automatisk vidarebefordran (avancerade regler)   /  Lägg automatiskt till hälsning   /  Dela automatiskt e-postmeddelanden med flera mottagare i individuella meddelanden ...

📨 Email Management: Hämta enkelt e-postmeddelanden  /  Blockera bluff-e-postmeddelanden av ämnen och andra  /  Ta bort duplicerade e-postmeddelanden  /  Avancerad Sökning  /  Konsolidera mappar ...

📁 Bilagor ProBatch Spara  /  Batch lossa  /  Batchkomprimera  /  Automatisk sparning   /  Auto Lossa  /  Automatisk komprimering ...

🌟 Gränssnittsmagi: 😊 Fler vackra och coola emojis   /  Öka din Outlook-produktivitet med flikar  /  Minimera Outlook istället för att stänga ...

👍 Underverk med ett klick: Svara alla med inkommande bilagor  /   E-postmeddelanden mot nätfiske  /  🕘Visa avsändarens tidszon ...

👩🏼‍🤝‍👩🏻 Kontakter och kalender: Lägg till kontakter i grupp från valda e-postmeddelanden  /  Dela upp en kontaktgrupp till individuella grupper  /  Ta bort påminnelser om födelsedag ...

Över 100 funktioner Vänta på din utforskning! Klicka här för att upptäcka mer.

Läs mer       Gratis nedladdning      Inköp
 

 

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