كيفية فتح مجلد Outlook معين من Excel؟
هل سبق لك أن حاولت فتح مجلد Outlook معين من ملف Excel ، مثل فتح مجلد Inbox أو مجلد جهات الاتصال أو أي مجلد آخر؟ في هذه المقالة سأتحدث عن كيفية فتح مجلد Outlook المطلوب من مصنف Excel؟
افتح مجلد Outlook محددًا من ملف Excel برمز VBA
افتح مجلد Outlook محددًا من ملف Excel برمز VBA
يمكن أن يساعدك رمز VBA التالي في فتح مجلد Outlook محدد من ورقة عمل Excel ، يرجى القيام بذلك على النحو التالي:
1. في Excel ، اضغط باستمرار على ملف ALT + F11 مفاتيح لفتح ميكروسوفت فيسوال باسيك للتطبيقات نافذة.
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
ملاحظة: في الكود أعلاه ، يمكنك تغيير الرسائل في ال قم بتعيين xFolder = xNameSpace.GetDefaultFolder (olFolderInbox) البرنامج النصي إلى أي اسم مجلد آخر تريد فتحه.
3. ثم اضغط الأدوات > المحلية في ال ميكروسوفت فيسوال باسيك للتطبيقات نافذة في الخارج المراجع - مشروع 1 مربع الحوار ، تحقق مكتبة كائنات Microsoft Outlook الخيار من المراجع المتاحة مربع القائمة ، انظر لقطة الشاشة:
4. ثم انقر فوق OK لإغلاق مربع الحوار ، واضغط على F5 مفتاح لتشغيل هذا الرمز ، وسيتم فتح مجلد Outlook المحدد على الفور.
أفضل أدوات إنتاجية المكتب
ارفع مهاراتك في برنامج Excel باستخدام Kutools for Excelوتجربة كفاءة لم يسبق لها مثيل. Kutools for Excel يقدم أكثر من 300 ميزة متقدمة لتعزيز الإنتاجية وتوفير الوقت. انقر هنا للحصول على الميزة التي تحتاجها أكثر...
Office Tab يجلب الواجهة المبوبة إلى Office ، ويجعل عملك أسهل بكثير
- تمكين التحرير والقراءة المبوبة في Word و Excel و PowerPointوالناشر والوصول و Visio والمشروع.
- فتح وإنشاء مستندات متعددة في علامات تبويب جديدة من نفس النافذة ، بدلاً من النوافذ الجديدة.
- يزيد من إنتاجيتك بنسبة 50٪ ، ويقلل مئات النقرات بالماوس كل يوم!
