मुख्य सामग्री पर जाएं

आउटलुक के माध्यम से एक्सेल से किसी सूची में वैयक्तिकृत सामूहिक ईमेल कैसे भेजें?

लेखक: ज़ियाओयांग अंतिम संशोधित: 2020-04-22

उदाहरण के लिए, मेरे पास वर्कशीट में निम्नलिखित डेटा रेंज है जिसमें नाम, ईमेल पता, पंजीकरण कोड कॉलम शामिल हैं, और अब, मैं कॉलम ए में अलग किए गए ईमेल पते पर वैयक्तिकृत ग्रीटिंग और अपने स्वयं के पंजीकरण कोड के साथ एक संदेश भेजना चाहता हूं। इस समस्या को हल करने के लिए निम्नलिखित तरीके आपकी मदद कर सकते हैं।

दस्तावेज़ वैयक्तिकृत ईमेल भेजें 1

मेल मर्ज फ़ंक्शन के साथ एक्सेल से एक सूची में वैयक्तिकृत सामूहिक ईमेल भेजें

वीबीए कोड के साथ एक्सेल से एक सूची में वैयक्तिकृत सामूहिक ईमेल भेजें

एक्सेल के लिए कुटूल का उपयोग करके विभिन्न अनुलग्नकों के साथ एक सूची में वैयक्तिकृत सामूहिक ईमेल भेजें

तीर नीला दायां बुलबुला मेल मर्ज फ़ंक्शन के साथ एक्सेल से एक सूची में वैयक्तिकृत सामूहिक ईमेल भेजें

शब्दों से मेल मर्ज फ़ंक्शन, आप इस कार्य को जल्दी और आसानी से पूरा कर सकते हैं, कृपया निम्न चरण दर चरण कार्य करें:

1. एक नया रिक्त Word दस्तावेज़ लॉन्च करें, और फिर क्लिक करें पत्र व्यवहार > प्राप्तकर्ताओं का चयन करें > मौजूदा सूची का उपयोग करें, स्क्रीनशॉट देखें:

दस्तावेज़ वैयक्तिकृत ईमेल भेजें 2

2. में डेटा स्रोत का चयन करें विंडो, वह कार्यपुस्तिका चुनें जिसमें वह डेटा श्रेणी शामिल है जिसका आप उपयोग करना चाहते हैं, और क्लिक करें प्रारंभिक बटन, स्क्रीनशॉट देखें:

दस्तावेज़ वैयक्तिकृत ईमेल भेजें 3

3. आने वाले समय में तालिका का चयन करें संवाद बॉक्स में, कृपया अपनी आवश्यक डेटा श्रेणी के साथ वर्कशीट चुनें और फिर क्लिक करें OK बटन, स्क्रीनशॉट देखें:

दस्तावेज़ वैयक्तिकृत ईमेल भेजें 4

4. और ई-मेल संदेश मुख्य दस्तावेज़ और आपकी पता सूची एक साथ जुड़ गई है, अब, आप टेक्स्ट संदेश को संपादित कर सकते हैं और प्लेसहोल्डर जोड़ सकते हैं जो इंगित करते हैं कि प्रत्येक संदेश में अद्वितीय जानकारी कहाँ दिखाई देगी।

(1.) उनका व्यक्तिगत अभिवादन नाम डालने के लिए क्लिक करें पत्र व्यवहार > मर्ज फ़ील्ड सम्मिलित करें > नाम, वैयक्तिकृत नाम संदेश में डाला गया है, और फ़ील्ड नाम चारों ओर से घिरा हुआ है «».

दस्तावेज़ वैयक्तिकृत ईमेल भेजें 5

(2.) अपना संदेश टाइप करते जाएं और डालें पंजीकरण कोड उस स्थान पर जहां आपको आवश्यकता है, स्क्रीनशॉट देखें:

दस्तावेज़ वैयक्तिकृत ईमेल भेजें 6

5. मैसेज लिखने के बाद आप क्लिक कर सकते हैं परिणाम देखें नीचे मेलिंग ई-मेल संदेशों का पूर्वावलोकन करने और वास्तव में मर्ज पूरा करने से पहले परिवर्तन करने के लिए टैब।

6. यह सुनिश्चित करने के बाद कि कोई समस्या नहीं है, आप अलग-अलग प्राप्तकर्ताओं को ई-मेल भेज सकते हैं, कृपया क्लिक करें पत्र व्यवहार > समाप्त करें और मर्ज करें > ईमेल संदेश भेजें, स्क्रीनशॉट देखें:

दस्तावेज़ वैयक्तिकृत ईमेल भेजें 7

7. फिर बाहर निकला ई-मेल में मर्ज करें संवाद बॉक्स में, निम्नलिखित कार्य करें:

(1.)से सेवा मेरे ड्रॉप डाउन सूची, कृपया चुनें मेल पता स्तंभ;

(2.) आप विषय को इसमें टाइप कर सकते हैं विषय लाइन टेक्स्ट बॉक्स;

(3.)से रिकॉर्ड भेजें अनुभाग चुनें सब.

दस्तावेज़ वैयक्तिकृत ईमेल भेजें 8

8। और फिर क्लिक करें OK, ईमेल अलग-अलग प्राप्तकर्ताओं को उनके स्वयं के पंजीकरण कोड के साथ एक ही बार में भेजे जाते हैं, ईमेल भेजने के बाद, आप यह सुनिश्चित करने के लिए अपने आउटलुक पर जा सकते हैं कि ईमेल सफलतापूर्वक भेजे गए हैं।

विभिन्न अनुलग्नकों के साथ एकाधिक प्राप्तकर्ताओं को वैयक्तिकृत ईमेल भेजें:

- एक्सेल के लिए कुटूल's ईमेल भेजिए सुविधा, आप आवश्यकतानुसार एक्सेल से आउटलुक के माध्यम से विभिन्न अनुलग्नकों के साथ कई प्राप्तकर्ताओं को वैयक्तिकृत ईमेल भेज सकते हैं। वहीं, आप किसी खास व्यक्ति के मैसेज को सीसी या बीसीसी भी कर सकते हैं।       अभी एक्सेल के लिए कुटूल डाउनलोड करें और निःशुल्क परीक्षण करें!

दस्तावेज़ वैयक्तिकृत ईमेल भेजें 18 1

तीर नीला दायां बुलबुला वीबीए कोड के साथ एक्सेल से एक सूची में वैयक्तिकृत सामूहिक ईमेल भेजें

मेल मर्ज फ़ंक्शन को छोड़कर, निम्नलिखित VBA कोड भी आपका उपकार कर सकता है, कृपया इसे इस प्रकार करें:

1. दबाए रखें ALT + F11 कुंजियाँ, और यह खुल जाती है अनुप्रयोगों के लिए माइक्रोसॉफ्ट विज़ुअल बेसिक खिड़की.

2। क्लिक करें सम्मिलित करें > मॉड्यूल, और निम्नलिखित कोड को इसमें पेस्ट करें मॉड्यूल खिड़की।

वीबीए कोड: एक्सेल से एक सूची में वैयक्तिकृत सामूहिक ईमेल भेजें:

#If VBA7 And Win64 Then
    Private Declare PtrSafe Function ShellExecute Lib "shell32.dll" Alias "ShellExecuteA" ( _
                         ByVal hwnd As LongPtr, ByVal lpOperation As String, _
                         ByVal lpFile As String, ByVal lpParameters As String, ByVal lpDirectory As String, _
                         ByVal nShowCmd As Long) As LongPtr
#Else
    Private Declare Function ShellExecute Lib "shell32.dll" Alias "ShellExecuteA" ( _
                         ByVal hwnd As Long, ByVal lpOperation As String, _
                         ByVal lpFile As String, ByVal lpParameters As String, ByVal lpDirectory As String, _
                         ByVal nShowCmd As Long) As Long
#End If
Sub SendEMail()
'update by Extendoffice 20160506
    Dim xEmail As String
    Dim xSubj As String
    Dim xMsg As String
    Dim xURL As String
    Dim i As Integer
    Dim k As Double
    Dim xCell As Range
    Dim xRg As Range
    Dim xTxt As String
    On Error Resume Next
    xTxt = ActiveWindow.RangeSelection.Address
    Set xRg = Application.InputBox("Please select the data range:", "Kutools for Excel", xTxt, , , , , 8)
    If xRg Is Nothing Then Exit Sub
    If xRg.Columns.Count <> 3 Then
        MsgBox " Regional format error, please check", , "Kutools for Excel"
        Exit Sub
    End If
    For i = 1 To xRg.Rows.Count
'       Get the email address
        xEmail = xRg.Cells(i, 2)
'       Message subject
        xSubj = "Your Registration Code"
'       Compose the message
        xMsg = ""
        xMsg = xMsg & "Dear " & xRg.Cells(i, 1) & "," & vbCrLf & vbCrLf
        xMsg = xMsg & " This is your Registration Code "
        xMsg = xMsg & xRg.Cells(i, 3).Text & "." & vbCrLf & vbCrLf
        xMsg = xMsg & " please try it, and glad to get your feedback! " & vbCrLf
        xMsg = xMsg & "Skyyang"
'       Replace spaces with %20 (hex)
        xSubj = Application.WorksheetFunction.Substitute(xSubj, " ", "%20")
        xMsg = Application.WorksheetFunction.Substitute(xMsg, " ", "%20")
'       Replace carriage returns with %0D%0A (hex)
        xMsg = Application.WorksheetFunction.Substitute(xMsg, vbCrLf, "%0D%0A")
'       Create the URL
        xURL = "mailto:" & xEmail & "?subject=" & xSubj & "&body=" & xMsg
'       Execute the URL (start the email client)
        ShellExecute 0&, vbNullString, xURL, vbNullString, vbNullString, vbNormalFocus
'       Wait two seconds before sending keystrokes
        Application.Wait (Now + TimeValue("0:00:02"))
        Application.SendKeys "%s"
    Next
End Sub

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

दस्तावेज़ वैयक्तिकृत ईमेल भेजें 9

4। और फिर क्लिक करें OK बटन, ईमेल को उनके व्यक्तिगत पंजीकरण कोड के साथ अलग-अलग पते पर एक-एक करके भेजा जाएगा, ईमेल भेजने के बाद, आप यह सुनिश्चित करने के लिए अपने आउटलुक पर जा सकते हैं कि ईमेल सफलतापूर्वक भेजे गए हैं।

नोट: उपरोक्त कोड में, आप अपनी आवश्यकता के अनुसार विषय या मुख्य संदेश को बदल सकते हैं।

तीर नीला दायां बुलबुला एक्सेल के लिए कुटूल का उपयोग करके विभिन्न अनुलग्नकों के साथ एक सूची में वैयक्तिकृत सामूहिक ईमेल भेजें

यदि आपके पास एक्सेल के लिए कुटूल, के साथ अपने ईमेल भेजिए सुविधा के अनुसार, आप आवश्यकतानुसार विभिन्न अनुलग्नकों के साथ अनेक प्राप्तकर्ताओं को शीघ्रता से वैयक्तिकृत ईमेल भेज सकते हैं।

एक्सेल के लिए कुटूल : 300 से अधिक उपयोगी एक्सेल ऐड-इन्स के साथ, 30 दिनों में बिना किसी सीमा के आज़माने के लिए निःशुल्क. 
डाउनलोड पर जाएं
नि:शुल्क परीक्षण 30 दिनखरीद फरोख्त
पेपैल/माईकॉमर्स

स्थापित करने के बाद एक्सेल के लिए कुटूल, कृपया ऐसा करें:

1। क्लिक करें कुटूल्स प्लस > ईमेल भेजिए, स्क्रीनशॉट देखें:

2. में ईमेल भेजें संवाद बॉक्स, कृपया उस डेटा श्रेणी का चयन करें जिसे आप उपयोग करना चाहते हैं, और फिर प्राप्तकर्ता पते, अनुलग्नक और विषय को अपनी आवश्यकता के अनुसार निर्दिष्ट करें, स्क्रीनशॉट देखें:

दस्तावेज़ वैयक्तिकृत ईमेल भेजें 9

3. संपादन बॉक्स में, व्यक्तिगत अभिवादन नाम डालें, कृपया चुनें नाम ड्रॉप डाउन सूची से, और फिर क्लिक करें प्लेसहोल्डर डालें संदेश में नाम डालने के लिए स्क्रीनशॉट देखें:

दस्तावेज़ वैयक्तिकृत ईमेल भेजें 9

4. फिर अपने संदेश का मुख्य भाग आवश्यकतानुसार बॉक्स में टाइप करें, स्क्रीनशॉट देखें:

दस्तावेज़ वैयक्तिकृत ईमेल भेजें 9

5. ईमेल का मुख्य भाग समाप्त करने के बाद, कृपया अपनी इच्छानुसार सेंड मोड चुनें, आप आउटलुक या अपने निर्दिष्ट सर्वर का उपयोग करके भेज सकते हैं, स्क्रीनहॉट देखें:

दस्तावेज़ वैयक्तिकृत ईमेल भेजें 9

नोट: यदि आप अन्य सर्वर का उपयोग करना चाहते हैं, तो क्लिक करें आउटगोइंग सर्वर सेटिंग्स भेजने का मोड अपने हिसाब से सेट करने के लिए, स्क्रीनहॉट देखें:

दस्तावेज़ वैयक्तिकृत ईमेल भेजें 9

6. अंत में क्लिक करें भेजें ईमेल भेजने के लिए बटन, पूरा करने के बाद, आपको भेजने की स्थिति याद दिलाने के लिए एक प्रॉम्प्ट बॉक्स खुलेगा। स्क्रीनहॉट देखें:

दस्तावेज़ वैयक्तिकृत ईमेल भेजें 9

अभी एक्सेल के लिए डाउनलोड और नि:शुल्क परीक्षण कुटूल पर क्लिक करें!

डेमो: आउटलुक के माध्यम से एक्सेल से एक सूची में वैयक्तिकृत सामूहिक ईमेल भेजें

एक्सेल के लिए कुटूल: 300 से अधिक उपयोगी एक्सेल ऐड-इन्स के साथ, 30 दिनों में बिना किसी सीमा के आज़माने के लिए निःशुल्क। अभी डाउनलोड करें और निःशुल्क परीक्षण करें!

संबंधित लेख:

एक्सेल से आउटलुक के माध्यम से एक सूची में एकाधिक प्राप्तकर्ताओं को ईमेल कैसे भेजें?

सर्वोत्तम कार्यालय उत्पादकता उपकरण

🤖 कुटूल्स एआई सहयोगी: निम्न के आधार पर डेटा विश्लेषण में क्रांति लाएं: बुद्धिमान निष्पादन   |  कोड जनरेट करें  |  कस्टम फ़ॉर्मूले बनाएं  |  डेटा का विश्लेषण करें और चार्ट बनाएं  |  कुटूल फ़ंक्शंस का आह्वान करें...
लोकप्रिय सुविधाएँ: डुप्लिकेट ढूंढें, हाइलाइट करें या पहचानें   |  रिक्त पंक्तियाँ हटाएँ   |  डेटा खोए बिना कॉलम या सेल को संयोजित करें   |   फॉर्मूला के बिना गोल ...
सुपर लुकअप: एकाधिक मानदंड VLookup  |   मल्टीपल वैल्यू वीलुकअप  |   अनेक शीटों में VLookup   |   फजी लुकअप ....
उन्नत ड्रॉप-डाउन सूची: शीघ्रता से ड्रॉप डाउन सूची बनाएं   |  आश्रित ड्रॉप डाउन सूची   |  बहु-चयन ड्रॉप डाउन सूची ....
स्तम्भ प्रबंधक: कॉलमों की एक विशिष्ट संख्या जोड़ें  |  कॉलम ले जाएँ  |  छिपे हुए कॉलम की दृश्यता स्थिति टॉगल करें  |  रेंज और कॉलम की तुलना करें ...
फीचर्ड फीचर्स: ग्रिड फोकस   |  डिजाइन देखें   |   बड़ा फॉर्मूला बार   |  कार्यपुस्तिका एवं शीट प्रबंधक   |  संसाधन लाइब्रेरी (ऑटो टेक्स्ट)   |  खजूर बीनने वाला   |  कार्यपत्रकों को संयोजित करें   |  एन्क्रिप्ट/डिक्रिप्ट सेल   |  सूची के अनुसार ईमेल भेजें   |  सुपर फ़िल्टर   |   विशेष फ़िल्टर (फ़िल्टर बोल्ड/इटैलिक/स्ट्राइकथ्रू...) ...
शीर्ष 15 टूलसेट:  12 टेक्स्ट टूल्स (पाठ जोड़ें, अक्षर हटाएँ, ...)   |   50 + चार्ट प्रकार (गैन्ट चार्ट, ...)   |   40+ प्रैक्टिकल सूत्र (जन्मदिन के आधार पर आयु की गणना करें, ...)   |   19 निवेशन टूल्स (QR कोड डालें, पथ से चित्र सम्मिलित करें, ...)   |   12 रूपांतरण टूल्स (शब्दों को संख्याएँ, मुद्रा रूपांतरण, ...)   |   7 विलय और विभाजन टूल्स (उन्नत संयोजन पंक्तियाँ, विभाजन कोशिकाओं, ...)   |   ... और अधिक

एक्सेल के लिए कुटूल के साथ अपने एक्सेल कौशल को सुपरचार्ज करें, और पहले जैसी दक्षता का अनुभव करें। एक्सेल के लिए कुटूल उत्पादकता बढ़ाने और समय बचाने के लिए 300 से अधिक उन्नत सुविधाएँ प्रदान करता है।  वह सुविधा प्राप्त करने के लिए यहां क्लिक करें जिसकी आपको सबसे अधिक आवश्यकता है...

Description

ऑफिस टैब ऑफिस में टैब्ड इंटरफ़ेस लाता है, और आपके काम को बहुत आसान बनाता है

  • Word, Excel, PowerPoint में टैब्ड संपादन और रीडिंग सक्षम करें, प्रकाशक, एक्सेस, विसियो और प्रोजेक्ट।
  • नई विंडो के बजाय एक ही विंडो के नए टैब में एकाधिक दस्तावेज़ खोलें और बनाएं।
  • आपकी उत्पादकता 50% बढ़ जाती है, और आपके लिए हर दिन सैकड़ों माउस क्लिक कम हो जाते हैं!
Comments (47)
No ratings yet. Be the first to rate!
Rochelley
Rochelley
This comment was minimized by the moderator on the site
Hi, I have used this from your Kutools for Excel, and it works a dream. However, the Outlook email signature is not working, despite it being checked off. I have a default email signature set up in Outlook to go with the default mail account. But no matter how many times I try, I can't get Kutools to insert the signature before sending the email. Should I be doing something different in Outlook with the email signature?
Reply
Report
0
0
skyyang
skyyang     Rochelley
This comment was minimized by the moderator on the site
Hello, Rochelley
Did you select the signature from the Outlook's Signatures and Stationery dialog box, see screenshot:
https://www.extendoffice.com/images/stories/comments/comment-skyyang/doc-signature-1.png
Please check it first, thank you!

If there still problem, please comment here.
Reply
Report
0
0
Traci Blanchard
Traci Blanchard
This comment was minimized by the moderator on the site
I've used KuTools Send Emails for personalized attachments using an Excel list and it works well. Is it possible to use this functionality to send personalized links to shared files instead of attachments? I've tried and haven't been able to get this to work.
Reply
0
0
skyyang
skyyang     Traci Blanchard
This comment was minimized by the moderator on the site
Hello, Blanchard

With our Send Emails feature, you can send the links of the shared files successfully.
You just need to change the attachment path to the link of the shared file, see below screenshot:

https://www.extendoffice.com/images/stories/comments/comment-skyyang/doc-bulk-send-emails.png

Please try, hope it can help you!

If this doesn't work, you can upload your error image here, so that we can check the problem.
Reply
Report
0
0
Traci Blanchard
Traci Blanchard
This comment was minimized by the moderator on the site
I've used KuTools Send Emails for personalized attachments using an Excel list and it works well. Is it possible to use this functionality to send personalized links to shared files instead of attachments? I've tried and haven't been able to get this to work.
Reply
0
0
Robert Baer
Robert Baer
This comment was minimized by the moderator on the site
In "Send personalized mass emails to a list from Excel with VBA code", it cannot work.For starters, the instructions wrt F11 does nothing, and so useless blather.Next, the #If...#End If cannot exist anywhere, as it (1) is treated as a comment and (2) the compiler crashes (cannot compile).So one tries it after the End Sub because the compiler says in effect comments to be after End Sub.Naturally, the "ShellExecute" causes a crash because it is not declared: remember, the #If...#End If had to be removed.
It would be nice to have WORKING code.
Reply
0
0
Pilar
Pilar
This comment was minimized by the moderator on the site
Thanks for the "How To Send Personalized Mass Emails To A List From Excel Via Outlook?", it is very useful.Question: I have 2 email addresses on my outlook. I want to use the 2nd one to send the personalized mass emails. How should I do that? I cannot find the way of changing the "From" when I finish&Merge. Can you help?
Reply
0
0
skyyang
skyyang     Pilar
This comment was minimized by the moderator on the site
Hello, Pilar,The normal Mail Merge function only can help to send the emials from the default account, if you want to send eamils from other account you defined, you can use our Send Emails feature of Kutools for Excel. You can download and installed the Kutools for Excel, free trial 30 days.Please try, hope it can help you!
View Attachments (1 / 5)
Reply
Report
0
0
Gopalakrishnan
Gopalakrishnan
This comment was minimized by the moderator on the site
<p>Could you please help me to include table structure in below code ?</p><p>Gopalakrishnan</p>
Reply
0
0
marian
marian
This comment was minimized by the moderator on the site
I used the kutools send mail option after sending mail theres no attachment
Reply
0
0
skyyang
skyyang     marian
This comment was minimized by the moderator on the site
Hi, marian,
Do you type the full path of the attachments into the cells? Please check it. Thank you!
View Attachments (1 / 5)
Reply
Report
0
0
MARIAN
MARIAN     skyyang
This comment was minimized by the moderator on the site
No I didn't type the path rather I used the insert link button to add the attachment
Reply
0
0
Ankit
Ankit
This comment was minimized by the moderator on the site
Hi, I have to send to one email address(BOT) multiple request for *documents.
* Subject line needs to be the document reference number as demonstrated in below table.
Email ID Subject
# policy 111
# policy 222
# policy 333
# policy 444
# policy 555
# policy 666
# policy 777
# policy 888
# policy 999
# policy 1110

please help me simplyfy my task. I use MS outlook 2013 and 2016
Reply
0
0
Ankit K
Ankit K
This comment was minimized by the moderator on the site
Email ID Subject
# policy 111
# policy 222
# policy 333
# policy 444
# policy 555
# policy 666
# policy 777
# policy 888
# policy 999
# policy 1110
Reply
0
0
Yashwanth Asandur
Yashwanth Asandur
This comment was minimized by the moderator on the site
Sub SendEm()

Dim i As Integer, Mail_Object, Email_Subject, o As Variant, lr As Long

lr = Cells(Rows.Count, "A").End(xlUp).Row

Set Mail_Object = CreateObject("Outlook.Application")

For i = 2 To lr

With Mail_Object.CreateItem(o)

.Subject = Range("B" & i).Value

.To = Range("A" & i).Value



.Body = Range("C" & i).Value

.attachments.Add (Sheets("Sheet1").Range("H" & i).Text)

.attachments.Add (Sheets("Sheet1").Range("I" & i).Text)

.attachments.Add (Sheets("Sheet1").Range("J" & i).Text)

.attachments.Add (Sheets("Sheet1").Range("K" & i).Text)

.Send



'.display 'disable display and enable send to send automatically

End With

Next i

MsgBox "E-mail successfully sent", 64

Application.DisplayAlerts = False

Set Mail_Object = Nothing

End Sub
Reply
0
0
There are no comments posted here yet
Load More
Please leave your comments in English
Guest
Posting as Guest
×
Rate this post:
Reset
0   Characters
Suggested Locations