एक्सेल में VBA स्क्रिप्ट का उपयोग करने के लिए किसी भी प्रोग्रामिंग ज्ञान की आवश्यकता नहीं होती है। VBA आपको कई उन्नत कार्य करने में मदद करता है जैसे कि एक स्प्रेडशीट रिपोर्ट बनाना जिसमें सभी पीसी जानकारी हो, एक स्प्रेडशीट से सीधे ईमेल करना ...
Microsoft Excel से ईमेल भेजने के लिए बस कुछ सरल स्क्रिप्ट की आवश्यकता होती है। यदि आप वास्तव में एक्सेल ऑफिस सॉफ्टवेयर से बाहर निकलना चाहते हैं तो इस सुविधा को अपनी स्प्रैडशीट में जोड़ने से न डरें ।
एक्सेल से ईमेल करें
Microsoft Excel में ईमेल भेजने के कई कारण हैं। उदाहरण के लिए, आपके कर्मचारी साप्ताहिक रूप से दस्तावेजों और स्प्रेडशीट को अपडेट करते हैं, और आप ईमेल सूचनाएं प्राप्त करना चाहते हैं जब वह क्रिया पूरी हो जाती है या कभी-कभी, आप एक ही कार्यपुस्तिका में सभी संपर्कों को ईमेल करना चाहते हैं। पर ...
आपने एक जटिल एक्सेल ईमेल स्क्रिप्ट का उपयोग करने के बारे में सोचा होगा, लेकिन यह वास्तव में बहुत सरल है। यह लेख आपको एक सुविधा का लाभ उठाने के लिए मार्गदर्शन करेगा जो कि एक्सेल VBA में लंबे समय से उपलब्ध है, जिसे सहयोग डेटा ऑब्जेक्ट (सीडीओ) कहा जाता है ।

सीडीओ एक मैसेजिंग कंपोनेंट है जिसका इस्तेमाल विंडोज में शुरुआती वर्जन से किया जाता है। इसे CDONTS कहा जाता था। Windows 2000 और XP के जन्म के बाद, "CDO for Windows 2000" ने इसे बदल दिया। यह घटक Microsoft Word या Excel में VBA स्थापना में शामिल है और किसी भी समय उपयोग के लिए उपलब्ध है।
वीबीए के साथ विंडोज उत्पादों में ईमेल करने के लिए इस घटक का उपयोग करना बेहद आसान है। उदाहरण के लिए, यह आलेख ईमेल भेजने के लिए Excel में CDO का उपयोग करता है जिसमें एक सेल में परिणाम होते हैं।
चरण 1: एक VBA मैक्रो बनाएँ
सबसे पहले, Excel Developer tab पर जाएं > Insert in Controls पैनल पर क्लिक करें , फिर एक कमांड बटन चुनें।
![VBA स्क्रिप्ट का उपयोग करके एक्सेल स्प्रेडशीट से ईमेल भेजने के निर्देश VBA स्क्रिप्ट का उपयोग करके एक्सेल स्प्रेडशीट से ईमेल भेजने के निर्देश]()
इसे इस वर्कशीट में खींचें, फिर डेवलपर रिबन में मैक्रोज़ पर क्लिक करके एक नया मैक्रो बनाएँ ।
![VBA स्क्रिप्ट का उपयोग करके एक्सेल स्प्रेडशीट से ईमेल भेजने के निर्देश VBA स्क्रिप्ट का उपयोग करके एक्सेल स्प्रेडशीट से ईमेल भेजने के निर्देश]()
जब आप Create बटन पर क्लिक करते हैं , तो यह VBA एडिटर खोलता है।
संपादक में उपकरण> संदर्भों पर नेविगेट करके सीडीओ पुस्तकालय का संदर्भ जोड़ें ।
![VBA स्क्रिप्ट का उपयोग करके एक्सेल स्प्रेडशीट से ईमेल भेजने के निर्देश VBA स्क्रिप्ट का उपयोग करके एक्सेल स्प्रेडशीट से ईमेल भेजने के निर्देश]()
Windows 2000 लाइब्रेरी के लिए Microsoft CDO देखने तक सूची को नीचे स्क्रॉल करें । चेकबॉक्स चेक करें और ओके पर क्लिक करें ।
![VBA स्क्रिप्ट का उपयोग करके एक्सेल स्प्रेडशीट से ईमेल भेजने के निर्देश VBA स्क्रिप्ट का उपयोग करके एक्सेल स्प्रेडशीट से ईमेल भेजने के निर्देश]()
जब आप ओके पर क्लिक करते हैं , तो उस फ़ंक्शन का नाम नोट करें जहां स्क्रिप्ट चिपकाई गई है, क्योंकि आपको बाद में इसकी आवश्यकता होगी।
चरण 2: सीडीओ फ़ील्ड "से" और "टू" पर सेट करें
ऐसा करने के लिए, आपको पहले ईमेल से संबंधित ऑब्जेक्ट बनाने और सभी आवश्यक ईमेल डिलीवरी फ़ील्ड सेट करने की आवश्यकता है।
याद रखें कि बहुत से क्षेत्र हो भी सकते हैं और नहीं भी, लेकिन आवश्यकता और आवश्यकता है।
मंद CDO_Mail ऑब्जेक्ट के रूप में
Dim CDO_Config ऑब्जेक्ट के रूप में
Dim SMTP_Config वेरिएंट के रूप में
Dim StSubject स्ट्रिंग के
रूप में
Dim strFrom स्ट्रिंग स्ट्रिंग के रूप में
Dim strTo स्ट्रिंग के रूप में
मंद strcc स्ट्रिंग के रूप में
मंद strccc स्ट्रिंग स्ट्रिंग के रूप में मंद स्ट्रिंग के रूप में स्ट्रिंग।
strSubject = "एक्सेल स्प्रेडशीट के परिणाम"
strFrom = "rdube02@gmail.com"
strTo = "rdube02@gmail.com"
strCc = ""
strBcc = ""
strBody = = इस तिमाही के कुल परिणाम हैं: "& Str (Sheet1) .Cells (2, 1))
दिलचस्प बात यह है कि आप संपूर्ण ईमेल संदेश को कस्टमाइज़ करने के लिए किसी भी वांछित स्ट्रिंग को बना सकते हैं और इसे स्ट्रोबबॉडी वैरिएबल असाइन कर सकते हैं।
ईमेल सामग्री में डाल सामग्री एक साथ स्ट्रिंग का उपयोग और माइक्रोसॉफ्ट एक्सेल से डेटा डालने ईमेल में किसी भी सही सामग्री (जैसा कि ऊपर दिखाया गया है)।
चरण 3: बाहरी SMTP का उपयोग करने के लिए CDO कॉन्फ़िगर करें
कोड का अगला टुकड़ा वह है जहां आप ईमेल भेजने के लिए किसी भी बाहरी एसएमटीपी सर्वर का उपयोग करने के लिए सीडीओ को कॉन्फ़िगर करते हैं।
यह उदाहरण जीमेल के माध्यम से एसएसएल सेट नहीं करता है, सीडीओ एसएसएल की जगह ले सकता है लेकिन यह इस लेख के दायरे से बाहर है। यदि आपको एसएसएल का उपयोग करने की आवश्यकता है, तो जीथब में उन्नत कोड आपकी मदद कर सकता है।
CDO_Mail = CreateObject सेट करें ("CDO.Message")
त्रुटि GoTo Error_Handling पर
CDO_Config सेट करें = CreateObject ("CDO.Configuration")
CDO_Config.Load -1
SMTP_Config = CDO_Config.Fields सेट करें
SMTP_Config के साथ .Item
("http://schemas.microsoft.com/cdo/configuration/senduse") = 2
.Item ("http://schemas.microsoft.com/cdo/configuration-smtpserver") = "smtp"। gmail.com "
.Item (" http://schemas.microsoft.com/cdo/configuration/smtpauthententicate ") = 1।
item (" http://schemas.microsoft.com/cdo/configuration/endususername ") =" "। email@website.com "।
item (" http://schemas.microsoft.com/cdo/configuration/sendpassword ") =" पासवर्ड "
.Item (" http://schemas.microsoft.com/cdo/configuration/smtpserverport] ") = 25।
इटेम (" http://schemas.microsoft.com/cdo/configuration/smtpusessl ") = True
.Upate
End With
CDO_Mail
सेट के साथ। Configuration = CDO_Config
End साथ
चरण 4: सीडीओ सेटअप पूरा करें
आपने अब ईमेल भेजने के लिए अपने SMTP सर्वर को कॉन्फ़िगर किया है। आपको बस इतना करना है कि CDO_Mail ऑब्जेक्ट के लिए उपयुक्त फ़ील्ड भरें और कमांड भेजें ।
यह कैसे करना है:
CDO_Mail.Subject = strSubject
CDO_Mail.From = strFrom
CDO_Mail.To = strTo
CDO_Mail.TextBody = strBody
CDO_Mail.CC = strCc
CDO_Mail.BCC = strBcc
CDO_Mail.Send
Error_Handling:
यदि Err.Description <> "" तो MsgBox Err.Description
आउटलुक ईमेल ऑब्जेक्ट का उपयोग करते समय कोई भी पॉप-अप या सुरक्षा अलर्ट नहीं दिखाई देते हैं।
सीडीओ बस ईमेल घटकों को एक साथ रखता है और सूचना भेजने में सक्षम करने के लिए सर्वर कनेक्शन विवरण का उपयोग करता है। यह Microsoft Word या Excel VBA स्क्रिप्ट में ईमेल को संयोजित करने का सबसे आसान तरीका है।
कमांड स्क्रिप्ट को इस स्क्रिप्ट से जोड़ने के लिए, कोड संपादक तक पहुंचें और उस कार्यपत्रक के VBA कोड को देखने के लिए Sheet1 पर क्लिक करें ।
उस फ़ंक्शन का नाम टाइप करें जहां आपने ऊपर स्क्रिप्ट चिपकाई थी।
![VBA स्क्रिप्ट का उपयोग करके एक्सेल स्प्रेडशीट से ईमेल भेजने के निर्देश VBA स्क्रिप्ट का उपयोग करके एक्सेल स्प्रेडशीट से ईमेल भेजने के निर्देश]()
यह आपको इनबॉक्स में प्राप्त होने वाली जानकारी है।
![VBA स्क्रिप्ट का उपयोग करके एक्सेल स्प्रेडशीट से ईमेल भेजने के निर्देश VBA स्क्रिप्ट का उपयोग करके एक्सेल स्प्रेडशीट से ईमेल भेजने के निर्देश]()
नोट : यदि आपको त्रुटि प्राप्त होती है, तो परिवहन सर्वर से कनेक्ट करने में विफल रहा , सुनिश्चित करें कि आपने सही उपयोगकर्ता नाम, पासवर्ड, एसएमटीपी सर्वर और पोर्ट नंबर को SMTP_Config के साथ सूचीबद्ध कोड लाइन में दर्ज किया है ।
पूरी प्रक्रिया को बढ़ाएं और स्वचालित करें
एक बटन के साथ एक्सेल से ईमेल भेजना वास्तव में सुरक्षित और सुविधाजनक है। यदि आप अक्सर इस सुविधा का उपयोग करना चाहते हैं, तो आप इसे स्वचालित कर सकते हैं।
ऐसा करने के लिए, आपको मैक्रो को बदलने की आवश्यकता है। विज़ुअल बेसिक एडिटर पर जाएं, इकट्ठा किए गए पूरे कोड को कॉपी और पेस्ट करें। इसके बाद, प्रोजेक्ट पदानुक्रम से ThisWorkbook चुनें ।
कोड विंडो के शीर्ष पर दो ड्रॉप-डाउन फ़ील्ड से, कार्यपुस्तिका का चयन करें और मेथड्स मेनू से खोलें पर क्लिक करें । ईमेल स्क्रिप्ट को निजी उप कार्यपुस्तिका_ओपन () में चिपकाएँ । जब भी आप एक्सेल फ़ाइल खोलते हैं तो यह क्रिया मैक्रो को चलाएगी।
![VBA स्क्रिप्ट का उपयोग करके एक्सेल स्प्रेडशीट से ईमेल भेजने के निर्देश VBA स्क्रिप्ट का उपयोग करके एक्सेल स्प्रेडशीट से ईमेल भेजने के निर्देश]()
अगला, कार्य शेड्यूलर खोलें । आप निर्दिष्ट अंतराल पर स्वचालित रूप से स्प्रेडशीट खोलने के लिए विंडोज से पूछने के लिए इस टूल का उपयोग करेंगे। उस समय, आपका मैक्रो सक्रिय और ईमेल किया जाएगा।
![VBA स्क्रिप्ट का उपयोग करके एक्सेल स्प्रेडशीट से ईमेल भेजने के निर्देश VBA स्क्रिप्ट का उपयोग करके एक्सेल स्प्रेडशीट से ईमेल भेजने के निर्देश]()
का चयन करें मूल कार्य बनाएं ... मेनू से कार्रवाई और निर्देशों का पालन करें जब तक आप स्क्रीन कार्रवाई तक पहुँचते हैं।
प्रोग्राम प्रारंभ करें चुनें और अगला क्लिक करें ।
![VBA स्क्रिप्ट का उपयोग करके एक्सेल स्प्रेडशीट से ईमेल भेजने के निर्देश VBA स्क्रिप्ट का उपयोग करके एक्सेल स्प्रेडशीट से ईमेल भेजने के निर्देश]()
कंप्यूटर पर Microsoft Excel स्थान खोजने या प्रोग्राम / स्क्रिप्ट फ़ील्ड में पथ को कॉपी और पेस्ट करने के लिए ब्राउज़ बटन का उपयोग करें ।
फिर तर्क जोड़ें फ़ील्ड में Microsoft Excel दस्तावेज़ में पथ दर्ज करें ।
पूर्ण निर्देश और शेड्यूल आपको बनाया जाएगा।
आपको अगले कुछ मिनटों में कार्रवाई शेड्यूल करके इस सुविधा का परीक्षण करना चाहिए, फिर कार्य को संशोधित करने के बाद इसे प्रभावी ढंग से काम करते हुए देखना चाहिए।
नोट : आपको यह सुनिश्चित करने के लिए ट्रस्ट सेंटर सेटिंग्स समायोजित करने की आवश्यकता हो सकती है कि मैक्रो निम्नानुसार चलता है:
स्प्रेडशीट खोलें और फ़ाइल> विकल्प> विश्वास केंद्र पर नेविगेट करें ।
यहां, ट्रस्ट सेंटर सेटिंग्स पर क्लिक करें । अगली स्क्रीन पर, कभी भी अवरुद्ध सामग्री के बारे में जानकारी न दिखाएँ ।
Microsoft Excel एक बहुत शक्तिशाली उपकरण है, लेकिन इसका उपयोग करना सीखना कभी-कभी कई लोगों के लिए चुनौतीपूर्ण हो सकता है। यदि आप इस सॉफ़्टवेयर को मास्टर करना चाहते हैं, तो आपको यह जानना होगा कि VBA का उपयोग कैसे करें। यह आसान नहीं है।
हालांकि, थोड़ा VBA अनुभव के साथ, आप Microsoft Excel पर बुनियादी कार्यों को स्वचालित कर सकते हैं और अधिक महत्वपूर्ण कार्यों पर अधिक समय केंद्रित कर सकते हैं।
आशा है कि लेख आपके लिए उपयोगी है। मैं आपको सफलता की कामना करता हूं!