Ana içeriğe atla

Outlook'tan belirli Excel dosyası nasıl açılır?

Outlook üzerinde çalışırken sık sık belirli bir Excel dosyası kullanmak istiyorsanız, bu dosyayı arada bir açmanız gerekir. Outlook'tan belirli bir çalışma kitabı dosyasını açmanın hızlı ve kolay bir yolu var mı? Bu yazıda nasıl çözüleceğinden bahsedeceğim.

Outlook'tan VBA koduyla belirli bir Excel dosyasını açın


Outlook'tan VBA koduyla belirli bir Excel dosyasını açın

İhtiyacınız olan varsayılan bir çalışma kitabı dosyasını açmak için aşağıdaki VBA kodunu kullanabilirsiniz, lütfen şu şekilde yapın:

1. Outlook'ta, ALT + F11 tuşlarını açmak için Uygulamalar için Microsoft Visual Basic pencere.

2. Daha sonra, Ekle > modülve aşağıdaki kodu modül Pencere.

VBA kodu: Outlook'tan belirli bir Excel dosyası açın:

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

not: Yukarıdaki kodda, Excel dosya yolunu değiştirmelisiniz: C: \ Kullanıcılar \ DT168 \ Masaüstü \ belgeyi böl \ kto-data.xlsx kendi başına.

3. Ve sonra, hala Uygulamalar için Microsoft Visual Basic Pencere, tıklayın Tools > Referanslar gitmek için Referanslar-Proje1 iletişim kutusu ve kontrol edin Microsoft Excel Nesne Kitaplığı seçeneği Mevcut Referanslar liste kutusu, ekran görüntüsüne bakın:

doc açık belirli excel 1

4. Daha sonra, OK iletişim kutusundan çıkmak için düğmesine basın, kod penceresini kaydedin ve kapatın. Şimdi, bu kodu Hızlı Erişim Araç Çubuğu.

5. Outlook'un ana arayüzünde Hızlı erişim araç çubuğunu özelleştir simgesini seçip Daha Komutlar, ekran görüntüsüne bakın:

doc açık belirli excel 2

6. içinde Outlook Seçenekleri iletişim kutusu:

  • (1.) Seçin Makrolar itibaren Komutları seçin açılır liste;
  • (2.) Ve sonra şimdi eklediğiniz VBA kod adını seçin;
  • (3.) Tıklayın Ekle kodu eklemek için düğme Hızlı erişim araç çubuğunu özelleştir liste kutusu.

doc açık belirli excel 3

7. Ve sonra bir makro simgesi Hızlı Erişim Araç Çubuğu aşağıdaki ekran görüntüsü gibi. Şu andan itibaren, bu butona tıkladığınızda, belirlediğiniz Excel dosyası bir defada açılacaktır.

doc açık belirli excel 4


En İyi Ofis Üretkenlik Araçları

Outlook için Kutools - Outlook'unuzu Güçlendirecek 100'den Fazla Güçlü Özellik

🤖 AI Posta Yardımcısı: Yapay zeka büyüsüyle anında profesyonel e-postalar: tek tıkla dahice yanıtlar, mükemmel ton, çok dilli ustalık. E-posta göndermeyi zahmetsizce dönüştürün! ...

???? E-posta Otomasyonu: Ofis Dışında (POP ve IMAP için kullanılabilir)  /  E-posta Gönderimini Planla  /  E-posta Gönderirken Kurallara Göre Otomatik CC/BCC  /  Otomatik İletme (Gelişmiş Kurallar)   /  Otomatik Karşılama Ekleme   /  Çok Alıcılı E-postaları Otomatik Olarak Bireysel Mesajlara Bölün ...

📨 E-posta Yönetimi: E-postaları Kolayca Geri Çağırın  /  Dolandırıcılık E-postalarını Konulara ve Diğerlerine Göre Engelleyin  /  Yinelenen E-postaları Silin  /  gelişmiş Arama  /  Klasörleri Birleştir ...

📁 Ekler ProToplu Kaydetme  /  Toplu Ayır  /  Toplu Sıkıştırma  /  Otomatik kaydet   /  Otomatik Ayır  /  Otomatik Sıkıştır ...

🌟 Arayüz Büyüsü: 😊Daha Fazla Güzel ve Havalı Emoji   /  Sekmeli Görünümlerle Outlook Verimliliğinizi Artırın  /  Outlook'u Kapatmak Yerine Küçültün ...

👍 Tek Tıklamayla Harikalar: Tümünü Gelen Eklerle Yanıtla  /   Kimlik Avına Karşı E-postalar  /  🕘Gönderenin Saat Dilimini Göster ...

👩🏼‍🤝‍👩🏻 Kişiler ve Takvim: Seçilen E-postalardan Toplu Kişi Ekleme  /  Kişi Grubunu Bireysel Gruplara Bölme  /  Doğum Günü Hatırlatıcılarını Kaldır ...

üzerinde 100 Özellikler Keşfinizi Bekleyin! Daha Fazlasını Keşfetmek İçin Buraya Tıklayın.

 

 

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