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

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

فتح مجلد معين في Outlook من ملف Excel باستخدام كود VBA

فتح مجلد معين في Outlook من ملف Excel باستخدام كود VBA

يمكن أن يساعدك الكود التالي لـ VBA على فتح مجلد معين في Outlook من ورقة عمل Excel، يرجى اتباع الخطوات التالية:

1. في Excel، اضغط مع الاستمرار على مفتاحي "Alt" + "F11" لفتح نافذة "Microsoft Visual Basic for Applications".

2. انقر فوق "إدراج" > "وحدة"، والصق الماكرو التالي في "نافذة الوحدة".

كود VBA: فتح مجلد معين في Outlook من ملف Excel:

Sub OpenOutlookFolder()
    Dim xOutlookApp As Outlook.Application
    Dim xNameSpace As Outlook.Namespace
    Dim xFolder As Outlook.Folder
    Dim xFolderType As OlDefaultFolders
    On Error Resume Next
    Set xOutlookApp = New Outlook.Application
    Set xNameSpace = xOutlookApp.Session
    Set xFolder = xNameSpace.GetDefaultFolder(olFolderInbox)
    xFolder.Display
    Set xFolder = Nothing
    Set xNameSpace = Nothing
    Set xOutlookApp = Nothing
    Exit Sub
End Sub

ملاحظة: في الكود أعلاه، يمكنك تغيير "البريد الوارد" في سطر الكود "Set xFolder = xNameSpace.GetDefaultFolder(olFolderInbox)" إلى أي اسم مجلد آخر تريد فتحه.

3. بعد ذلك، انقر فوق "أدوات" > "المراجع" في نافذة "Microsoft Visual Basic for Applications"، وفي مربع الحوار المنبثق "References-Project1"، قم بتحديد خيار "مكتبة كائنات Microsoft Outlook" من قائمة "المراجع المتاحة". انظر إلى لقطة الشاشة:

4. ثم انقر فوق "موافق" لإغلاق مربع الحوار، واضغط على مفتاح "F5" لتشغيل هذا الكود، وسيتم فتح مجلد Outlook المحدد على الفور.

---

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

خبر عاجل: Kutools لـ Outlook يطلق إصدارًا مجانيًا!

جرب الإصدار الجديد كليًا من Kutools لـ Outlook مع أكثر من100 ميزة مذهلة! انقر لتنزيل الآن!

🤖 Kutools AI : يستخدم تكنولوجيا الذكاء الاصطناعي المتقدمة للتعامل مع البريد الإلكتروني بسهولة، بما في ذلك الرد، التلخيص، التحسين، التوسيع، الترجمة، وإنشاء رسائل البريد الإلكتروني.

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

📨 إدارة البريد الإلكتروني: استدعاء البريد الإلكتروني / حظر رسائل التصيد بناءً على الموضوعات أو أخرى / حذف البريد الإلكتروني المكرر / البحث المتقدم / تنظيم المجلدات ...

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

🌟 جمالية الواجهة: 😊 المزيد من الرموز التعبيرية الجميلة والرائعة / تذكيرك عند وصول رسائل البريد الهامة / تصغير Outlook بدلًا من الإغلاق ...

👍 ميزات بنقرة واحدة: الرد على الجميع مع المرفقات / البريد الإلكتروني المضاد للتصيد / 🕘 عرض المنطقة الزمنية للمرسل ...

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

استخدم Kutools بلغتك المفضلة – يدعم الإنجليزية والإسبانية والألمانية والفرنسية والصينية وأكثر من40 لغة أخرى!

افتح Kutools لـ Outlook فورًا بنقرة واحدة. لا تنتظر، قم بالتنزيل الآن وارتقِ بإنتاجيتك!

جدول أحادي الأبعاد لميزات Kutools لـ Outlook تنزيل الآن انتقل للشراء

🚀 تنزيل بنقرة واحدة — احصل على جميع إضافات Office

موصى به بقوة: Kutools لـ Office (خمسة في واحد)

بنقرة واحدة يمكنك تنزيل خمسة برامج تثبيت مرة واحدة — Kutools لـ Excel وOutlook وWord وPowerPoint وOffice Tab Pro. انقر لتنزيل الآن!

• ✅ سهولة بنقرة واحدة: قم بتنزيل جميع حزم التثبيت الخمسة دفعة واحدة.
• 🚀 جاهز لأي مهمة في Office: ثبّت الإضافات التي تحتاجها وقتما تشاء.
• 🧰 يتضمن: Kutools لـ Excel / Kutools لـ Outlook / Kutools لـ Word / Office Tab Pro / Kutools لـ PowerPoint

حول الحزمة ⬇ تنزيل الحزمة 💳 شراء الحزمة