फ़ाइल सिस्टम से आउटलुक फ़ोल्डर में संदेश फ़ाइलों को कैसे आयात करें?

आम तौर पर, आप फाइल सिस्टम से msg फाइलों को खींचकर और छोड़कर एक आउटलुक फ़ोल्डर में आयात कर सकते हैं। इस अनुच्छेद में, हम आपको फ़ाइल सिस्टम से सभी संदेश फ़ाइलों को विवरण में एक निर्दिष्ट Outlook फ़ोल्डर में आयात करने के लिए एक आसान तरीका दिखा रहे हैं।

फ़ाइल सिस्टम से VBA कोड के साथ आउटलुक फ़ोल्डर में आयात करें

फ़ाइल सिस्टम से VBA कोड के साथ आउटलुक फ़ोल्डर में आयात करें

कृपया फ़ाइल सिस्टम से संदेश फ़ाइलों को Outlook में निर्दिष्ट फ़ोल्डर में आयात करने के लिए निम्नानुसार करें

1। दबाएं ऑल्ट + F11 कुंजी को खोलने के लिए अनुप्रयोगों के लिए Microsoft Visual Basic खिड़की.

2। में अनुप्रयोगों के लिए Microsoft Visual Basic खिड़की, क्लिक करें सम्मिलित करें > मॉड्यूल। फिर मॉड्यूल विंडो में VBA कोड को कॉपी करें।

VBA कोड: फ़ाइल सिस्टम से आउटलुक फ़ोल्डर में आयात संदेश फ़ाइलें

उप आयात मेसेज इन्फ़ोल्डर () डिम एक्सएफएसओ स्क्रिप्टिंग के रूप में। फ़ाइलसिस्टमऑब्जेक्ट डीएम एक्सएसएसआरएफटीपी स्क्रिप्टिंग के रूप में। फ़ॉलर डिम एक्सएसफ़ोर्डपाथ स्ट्रिंग डिम एक्सफ़ाइल आईटम के रूप में स्क्रिप्टिंग के रूप में। फिइल डिम एक्सएमएसजी ऑब्जेक्ट डिम एक्सएमएल के रूप में मेलआईटम डीमैक्स एक्सएसएफ़फ़्ल्ड जैसे कि Outlook.Folder त्रुटि पुनः आरंभ करें अगली सेट करें एक्सएफएसओ = न्यू स्क्रिप्टिंग। FileSystemObject सेट xSelFolder = CreateObject ("Shell.Application")। BrowseForFolder (0, "एक फ़ोल्डर चुनें:", 0, 0) यदि प्रकार प्रकार नहीं (xSelFolder) = "कुछ भी नहीं" फिर xSourceFldPath = xSelFolder.self.Path + "\" अन्य xsourceFldPath = "" उपसमूह से बाहर निकलें यदि xSourceFld = xFSO.GetFolder (xSourceFldPath) सेट करें xSaveFld = GetObject ("", "Outlook.Application")। GetNamespace ("MAPI")। PickFolder TypeName (xSaveFld) = "कुछ भी नहीं" तो प्रत्येक एक्सफाइल आईटम के लिए एक्सएसफ़ाइलआईटीम से बाहर निकलें यदि xMSG = सत्र सेट करें। ओपनशैर्डआईटम (xFileItem.Path) सेट करें xMailItem = xMSG.Copy xMailItem.Move xSaveFld सेट करें xMailItem = कुछ नहीं xMSG.कुछ नहीं xMSG.Delete सेट करें xMSG = कुछ नहीं अगला xFileItem सेट करें xFileItem = कुछ भी नहीं सेट करें xSourceFld = कुछ नहीं सेट करें xFSO = N ओफ़ एंड एंड सब

3। दबाएं F5 कोड चलाने के लिए कुंजी खोलने में फोल्डर खोंजे डायलॉग बॉक्स में, फ़ोल्डर का चयन करें जिसमें आप msg फ़ाइल में आयात करेंगे, और उसके बाद फ़ोल्डर क्लिक करें OK बटन। स्क्रीनशॉट देखें:

4। अब एक फ़ोल्डर का चयन करें संवाद बॉक्स पॉप अप, कृपया एक का चयन करें आउटलुक आयातित संदेश फ़ाइलों को सहेजने के लिए फ़ोल्डर, और क्लिक करें OK बटन.

तब आपके फाइल सिस्टम में एक निश्चित फ़ोल्डर में सभी msg फाइल एक निर्दिष्ट Outlook फ़ोल्डर में तुरंत आयात की जाती है

संबंधित आलेख:

• Outlook में थोक में MSG फ़ाइलों के रूप में एकाधिक चयनित ईमेल कैसे सहेज सकते हैं?

अनुशंसित उत्पादकता उपकरण

कार्यालय टैब

Excel और अन्य कार्यालय सॉफ़्टवेयर में आसान टैब लाएं, जैसे कि क्रोम, फ़ायरफ़ॉक्स और नए इंटरनेट एक्सप्लोरर।

एक्सेल के लिए कुटूल