एक्सेल से केवल आउटलुक के माध्यम से वर्कशीट कैसे भेजें?
यदि आप आउटलुक के माध्यम से एक्सेल में किसी कार्यपुस्तिका से एक एकल कार्यपत्रक ईमेल करना चाहते हैं, तो आप कार्यपत्रक को अनुलग्नक के रूप में, मुख्य सामग्री के रूप में या पीडीएफ फ़ाइल के रूप में भेज सकते हैं। लेकिन क्या एक्सेल में इस समस्या से निपटने का कोई त्वरित तरीका है?
मेल प्राप्तकर्ता कमांड को भेजें के साथ एक्सेल से बॉडी के रूप में एकल वर्कशीट भेजें
VBA कोड के साथ Excel से अनुलग्नक के रूप में एकल वर्कशीट भेजें
वीबीए कोड के साथ एक्सेल से पीडीएफ फाइल के रूप में एकल वर्कशीट भेजें
मेल प्राप्तकर्ता कमांड को भेजें के साथ एक्सेल से बॉडी के रूप में एकल वर्कशीट भेजें
Excel हमें मेल प्राप्तकर्ता को भेजें कमांड का उपयोग करके सक्रिय वर्कशीट को मुख्य सामग्री के रूप में ईमेल करने में सहायता करता है। आप इस प्रकार कर सकते हैं:
यदि आप Excel 2007, 2010 या 2013 का उपयोग करते हैं, तो आपको इसे जोड़ना होगा मेल प्राप्तकर्ता को भेजें कमान के लिए त्वरित एक्सेस टूलबार पहले।
1. के आइकन पर क्लिक करें क्विक एक्सेस टूलबार कस्टमाइज़ करें, और चुनें अधिक कमांड, स्क्रीनशॉट देखें:
2. और इसमें एक्सेल विकल्प संवाद बॉक्स, चुनें आदेश रिबन में नहीं में से कमांड चुनें ड्रॉप डाउन सूची, फिर चुनें मेल प्राप्तकर्ता को भेजें विकल्प, और क्लिक करें जोड़ें >> इस कमांड को जोड़ने के लिए बटन पर आखिरी बार क्लिक करें OK इस सेटिंग को सहेजने के लिए. स्क्रीनशॉट देखें:
3. RSI मेल प्राप्तकर्ता को भेजें में कमांड डाला गया है त्वरित एक्सेस टूलबार, स्क्रीनशॉट देखें:
4. फिर इस पर क्लिक करें मेल प्राप्तकर्ता को भेजें आइकन बटन, और एक प्रॉम्प्ट बॉक्स पॉप आउट हो जाता है ईमेल प्रॉम्प्ट बॉक्स, जाँचें वर्तमान शीट को संदेश के मुख्य भाग के रूप में भेजें, और क्लिक करें OK. स्क्रीनशॉट देखें:
5. और वर्कशीट डेटा के ऊपर एक ईमेल संपादन बॉक्स प्रदर्शित होता है, आप अपने प्राप्तकर्ताओं, विषय और परिचय को संबंधित टेक्स्ट बॉक्स में दर्ज कर सकते हैं। स्क्रीनशॉट देखें:
6. तब क्लिक करो यह शी भेजोइस सक्रिय वर्कशीट को अपने विशिष्ट व्यक्ति को संदेश के मुख्य भाग के रूप में भेजने के लिए।
VBA कोड के साथ Excel से अनुलग्नक के रूप में एकल वर्कशीट भेजें
यदि आप सक्रिय वर्कशीट को अनुलग्नक के रूप में ईमेल करना चाहते हैं, तो निम्नलिखित वीबीए कोड आपके लिए उपयोगी हो सकता है।
1. अपनी वर्कशीट सक्रिय करें जिसे आप भेजना चाहते हैं।
2. दबाए रखें ALT + F11 कुंजियाँ, और यह खुल जाती है एप्लीकेशन विंडो के लिए माइक्रोसॉफ्ट विज़ुअल बेसिक.
3। क्लिक करें सम्मिलित करें > मॉड्यूल, और निम्नलिखित कोड को इसमें पेस्ट करें मॉड्यूल विंडो.
वीबीए कोड: वर्तमान वर्कशीट को एक्सेल से अनुलग्नक के रूप में भेजें
Sub SendWorkSheet()
'Update 20131209
Dim xFile As String
Dim xFormat As Long
Dim Wb As Workbook
Dim Wb2 As Workbook
Dim FilePath As String
Dim FileName As String
Dim OutlookApp As Object
Dim OutlookMail As Object
On Error Resume Next
Application.ScreenUpdating = False
Set Wb = Application.ActiveWorkbook
ActiveSheet.Copy
Set Wb2 = Application.ActiveWorkbook
Select Case Wb.FileFormat
Case xlOpenXMLWorkbook:
xFile = ".xlsx"
xFormat = xlOpenXMLWorkbook
Case xlOpenXMLWorkbookMacroEnabled:
If Wb2.HasVBProject Then
xFile = ".xlsm"
xFormat = xlOpenXMLWorkbookMacroEnabled
Else
xFile = ".xlsx"
xFormat = xlOpenXMLWorkbook
End If
Case Excel8:
xFile = ".xls"
xFormat = Excel8
Case xlExcel12:
xFile = ".xlsb"
xFormat = xlExcel12
End Select
FilePath = Environ$("temp") & "\"
FileName = Wb.Name & Format(Now, "dd-mmm-yy h-mm-ss")
Set OutlookApp = CreateObject("Outlook.Application")
Set OutlookMail = OutlookApp.CreateItem(0)
Wb2.SaveAs FilePath & FileName & xFile, FileFormat:=xFormat
With OutlookMail
.To = ""
.CC = ""
.BCC = ""
.Subject = "kte features"
.Body = "Please check and read this document."
.Attachments.Add Wb2.FullName
.Send
End With
Wb2.Close
Kill FilePath & FileName & xFile
Set OutlookMail = Nothing
Set OutlookApp = Nothing
Application.ScreenUpdating = True
End Sub
नोट: उपरोक्त कोड में, आप निम्नलिखित जानकारी को अपनी आवश्यकता के अनुसार बदल सकते हैं।
- .को = ""
- .सीसी = ""
- .बीसीसी = ""
- .विषय = "केटीई विशेषताएं"
- .बॉडी = "कृपया इस दस्तावेज़ को जांचें और पढ़ें।"
4। तब दबायें F5 इस कोड को चलाने के लिए कुंजी, और एक प्रॉम्प्ट बॉक्स पॉप आउट होगा, क्लिक करें अनुमति देना जब प्रगति पट्टी समाप्त हो जाती है, और तब वर्तमान वर्कशीट आपके प्राप्तकर्ता को अनुलग्नक के रूप में भेज दी जाती है।
वीबीए कोड के साथ एक्सेल से पीडीएफ फाइल के रूप में एकल वर्कशीट भेजें
कभी-कभी, आपको अपनी वर्कशीट रिपोर्ट दूसरों को भेजने की आवश्यकता होती है लेकिन आप नहीं चाहते कि अन्य लोग इसे संशोधित करें। इस स्थिति में, आप वर्कशीट को एक्सेल से पीडीएफ फाइल के रूप में भेज सकते हैं।
1. अपनी वर्कशीट सक्रिय करें जिसे आप भेजना चाहते हैं।
2. दबाए रखें ALT + F11 कुंजियाँ, और यह खुल जाती है एप्लीकेशन विंडो के लिए माइक्रोसॉफ्ट विज़ुअल बेसिक.
3। क्लिक करें सम्मिलित करें > मॉड्यूल, और निम्नलिखित कोड को इसमें पेस्ट करें मॉड्यूल विंडो.
वीबीए कोड: वर्तमान वर्कशीट को एक्सेल से पीडीएफ फाइल के रूप में भेजें
Sub SendWorkSheetToPDF()
'Update 20131209
Dim Wb As Workbook
Dim FileName As String
Dim OutlookApp As Object
Dim OutlookMail As Object
On Error Resume Next
Set Wb = Application.ActiveWorkbook
FileName = Wb.FullName
xIndex = VBA.InStrRev(FileName, ".")
If xIndex > 1 Then FileName = VBA.Left(FileName, xIndex - 1)
FileName = FileName & "_" + ActiveSheet.Name & ".pdf"
ActiveSheet.ExportAsFixedFormat Type:=xlTypePDF, FileName:=FileName
Set OutlookApp = CreateObject("Outlook.Application")
Set OutlookMail = OutlookApp.CreateItem(0)
With OutlookMail
.To = ""
.CC = ""
.BCC = ""
.Subject = "kte features"
.Body = "Please check and read this document."
.Attachments.Add FileName
.Send
End With
Kill FileName
Set OutlookMail = Nothing
Set OutlookApp = Nothing
End Sub
नोट: उपरोक्त कोड में, आप निम्नलिखित जानकारी को अपनी आवश्यकता के अनुसार बदल सकते हैं।
- .को = ""
- .सीसी = ""
- .बीसीसी = ""
- .विषय = "केटीई विशेषताएं"
- .बॉडी = "कृपया इस दस्तावेज़ को जांचें और पढ़ें।"
4। फिर दबायें F5 कुंजी, और एक प्रॉम्प्ट बॉक्स खुलेगा, क्लिक करें अनुमति देना प्रगति पट्टी समाप्त होने के बाद, सक्रिय वर्कशीट को पीडीएफ फ़ाइल के रूप में विशिष्ट व्यक्ति को भेज दिया गया है।
टिप्पणियाँ:
1. ये विधियाँ केवल तभी उपलब्ध होती हैं जब आप आउटलुक को अपने मेल प्रोग्राम के रूप में उपयोग करते हैं।
2. वर्तमान वर्कशीट भेजने के बाद, आप यह सुनिश्चित करने के लिए अपने आउटलुक पर जा सकते हैं कि ईमेल सफलतापूर्वक भेजा गया है।
मेलिंग सूची बनाएं फिर ईमेल भेजें
|
RSI एक्सेल के लिए कुटूल's मेलिंग सूची बनाएं और भेजें ईमेल उपयोगिताएँ किसी वर्कशीट में तुरंत मेलिंग सूची बना सकती हैं, फिर एक ही विषय, एक ही सामग्री और एक ही अनुलग्नक को कई ईमेल पतों पर भेज सकती हैं। |
संबंधित आलेख:
एक्सेल से आउटलुक के माध्यम से वर्तमान कार्यपुस्तिका कैसे भेजें?
एक्सेल से आउटलुक के माध्यम से सेल की रेंज कैसे भेजें/ईमेल करें?
सर्वोत्तम कार्यालय उत्पादकता उपकरण
एक्सेल के लिए कुटूल के साथ अपने एक्सेल कौशल को सुपरचार्ज करें, और पहले जैसी दक्षता का अनुभव करें। एक्सेल के लिए कुटूल उत्पादकता बढ़ाने और समय बचाने के लिए 300 से अधिक उन्नत सुविधाएँ प्रदान करता है। वह सुविधा प्राप्त करने के लिए यहां क्लिक करें जिसकी आपको सबसे अधिक आवश्यकता है...
ऑफिस टैब ऑफिस में टैब्ड इंटरफ़ेस लाता है, और आपके काम को बहुत आसान बनाता है
- Word, Excel, PowerPoint में टैब्ड संपादन और रीडिंग सक्षम करें, प्रकाशक, एक्सेस, विसियो और प्रोजेक्ट।
- नई विंडो के बजाय एक ही विंडो के नए टैब में एकाधिक दस्तावेज़ खोलें और बनाएं।
- आपकी उत्पादकता 50% बढ़ जाती है, और आपके लिए हर दिन सैकड़ों माउस क्लिक कम हो जाते हैं!