انتقل إلى المحتوى الرئيسي

كيفية فتح ملف Excel معين من Outlook؟

إذا كنت ترغب في استخدام ملف Excel معين بشكل متكرر عند العمل على Outlook ، فأنت بحاجة إلى فتح هذا الملف بين الحين والآخر. هل هناك أي طريقة سريعة وسهلة لفتح ملف مصنف محدد من Outlook؟ هذا المقال سوف أتحدث عن كيفية حلها.

افتح ملف Excel محددًا من Outlook برمز VBA


افتح ملف Excel محددًا من Outlook برمز VBA

يمكنك استخدام رمز فبا التالي لفتح ملف مصنف افتراضي كما تريد ، يرجى القيام بذلك على النحو التالي:

1. في Outlook ، اضغط باستمرار على ملف ALT + F11 مفاتيح لفتح ميكروسوفت فيسوال باسيك للتطبيقات نافذة.

2. ثم اضغط إدراج > وحدة، والصق الكود التالي في ملف وحدة نافذة او شباك.

كود فبا: افتح ملف إكسل محدد من آوتلوك:

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: \ المستخدمون \ DT168 \ سطح المكتب \ تقسيم المستند \ kto-data.xlsx لنفسك.

3. وبعد ذلك ، لا يزال في ميكروسوفت فيسوال باسيك للتطبيقات الإطار، انقر فوق الأدوات > مراجع حسابات للذهاب إلى المراجع - مشروع 1 مربع الحوار ، وتحقق مكتبة كائنات Microsoft Excel الخيار من المراجع المتاحة مربع القائمة ، انظر لقطة الشاشة:

دوك افتح ملف اكسل محدد 1

4. ثم اضغط OK زر للخروج من مربع الحوار ، احفظ وأغلق نافذة الكود. الآن ، يجب عليك إضافة هذا الرمز إلى ملف شريط أدوات الوصول السريع.

5. في الواجهة الرئيسية لبرنامج Outlook ، انقر فوق تخصيص شريط أدوات الوصول السريع ، وحدد المزيد من الأوامر، انظر لقطة الشاشة:

دوك افتح ملف اكسل محدد 2

6. في مجلة خيارات التوقعات صندوق المحادثة:

  • (1.) حدد وحدات الماكرو من اختر الأوامر من قائمة منسدلة؛
  • (2.) ثم اختر اسم رمز VBA الذي أدخلته للتو ؛
  • (3.) انقر أضف زر لإضافة الرمز إلى ملف تخصيص شريط أدوات الوصول السريع مربع القائمة.

دوك افتح ملف اكسل محدد 3

7. ثم يتم عرض أيقونة الماكرو في ملف شريط أدوات الوصول السريع كما تظهر لقطة الشاشة التالية. من الآن فصاعدًا ، عند النقر فوق هذا الزر ، سيتم فتح ملف Excel المحدد الخاص بك مرة واحدة.

دوك افتح ملف اكسل محدد 4


أفضل أدوات إنتاجية المكتب

كوتولس لتوقعات - أكثر من 100 ميزة قوية لتعزيز توقعاتك

🤖 مساعد بريد الذكاء الاصطناعي: رسائل بريد إلكتروني احترافية فورية مع سحر الذكاء الاصطناعي - بنقرة واحدة للردود العبقرية، والنغمة المثالية، وإتقان متعدد اللغات. تحويل البريد الإلكتروني دون عناء! ...

📧 أتمتة البريد الإلكتروني: خارج المكتب (متوفر لـ POP وIMAP)  /  جدولة إرسال رسائل البريد الإلكتروني  /  نسخة تلقائية/نسخة مخفية الوجهة حسب القواعد عند إرسال البريد الإلكتروني  /  إعادة التوجيه التلقائي (القواعد المتقدمة)   /  إضافة تحية تلقائية   /  تقسيم رسائل البريد الإلكتروني متعددة المستلمين تلقائيًا إلى رسائل فردية 

📨 إدارة البريد الإلكتروني: استدعاء رسائل البريد الإلكتروني بسهولة  /  حظر رسائل البريد الإلكتروني الاحتيالية حسب الموضوعات والآخرين  /  حذف رسائل البريد الإلكتروني المكررة  /  المزيد من خيارات البحث  /  توحيد المجلدات 

📁 المرفقات بروحفظ دفعة  /  فصل دفعة  /  ضغط دفعة  /  حفظ تلقائي   /  فصل تلقائي  /  ضغط تلقائي 

؟؟؟؟ واجهة ماجيك: 😊 المزيد من الرموز التعبيرية الجميلة والرائعة   /  عزز إنتاجية Outlook الخاص بك باستخدام طرق العرض المبوبة  /  تصغير Outlook بدلاً من الإغلاق 

؟؟؟؟ بنقرة واحدة عجائب: الرد على الكل بالمرفقات الواردة  /   رسائل البريد الإلكتروني لمكافحة التصيد  /  🕘إظهار المنطقة الزمنية للمرسل 

👩🏼‍🤝‍👩🏻 جهات الاتصال والتقويم: دفعة إضافة جهات الاتصال من رسائل البريد الإلكتروني المحددة  /  تقسيم مجموعة اتصال إلى مجموعات فردية  /  إزالة تذكير عيد ميلاد 

على مدى ميزات 100 في انتظار الاستكشاف الخاص بك! انقر هنا لاكتشاف المزيد.

 

 

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