यदि आप ऐसे उद्योग में हैं जहां आपको हर दिन अनगिनत ईमेल प्राप्त होते हैं, तो आपको संभवतः कई अटैचमेंट वाले कई ईमेल मिलते हैं। यदि डाउनलोड करने के लिए कई अटैचमेंट हैं तो मैन्युअल विधि का उपयोग करके अटैचमेंट निकालना समय लेने वाला हो सकता है। सौभाग्य से, माइक्रोसॉफ्ट आउटलुक का उपयोग करके एक साथ कई ईमेल अटैचमेंट सहेजना आसान है।
विंडोज पर एक साथ सभी माइक्रोसॉफ्ट आउटलुक ईमेल अटैचमेंट कैसे डाउनलोड करें
विंडोज माइक्रोसॉफ्ट आउटलुक ऐप का उपयोग करके एक साथ सभी अटैचमेंट डाउनलोड करने के लिए, निम्न कार्य करें:
- आउटलुक खोलें और अपने आउटलुक प्रोफाइल में साइन इन करें।
- वांछित आउटलुक अटैचमेंट वाले ईमेल का चयन करें।
- किसी भी अटैचमेंट फ़ाइल पर राइट-क्लिक करें और ड्रॉप-डाउन मेनू में "Save all attachments" चुनें। यदि आप केवल एक फ़ाइल सहेजना चाहते हैं, तो "Save As" चुनें।
- नए डायलॉग बॉक्स में, अपने कीबोर्ड पर CTRL कुंजी दबाए रखें और उन सभी अटैचमेंट का चयन करें जिन्हें आप डाउनलोड करना चाहते हैं। OK पर क्लिक करें।
- वह स्थान चुनें जहां आप फ़ाइलों को सहेजना चाहते हैं और OK बटन दबाएं।
मैक पर एक साथ सभी माइक्रोसॉफ्ट आउटलुक ईमेल अटैचमेंट कैसे डाउनलोड करें
आउटलुक फॉर मैक का उपयोग करके सभी अटैचमेंट डाउनलोड करने का तरीका यहां दिया गया है:
- MS आउटलुक एप्लिकेशन खोलें।
- वह ईमेल संदेश चुनें जिसमें आपके अटैचमेंट हैं।
- Attachments पर क्लिक करें और "Download All" चुनें।
- वह स्थान चुनें जहां आप अपने अटैचमेंट सहेजना चाहते हैं और "Choose" चुनें।
कई ईमेल से एकाधिक आउटलुक अटैचमेंट कैसे डाउनलोड करें
कई ईमेल से एक साथ एकाधिक अटैचमेंट डाउनलोड करना भी संभव है। ऐसा करने के लिए:
VBA कोड का उपयोग करें
यदि आप आउटलुक 2019, 2016, 2013, 2010, 2007, या 2003 का उपयोग कर रहे हैं, तो आप कई ईमेल से एकाधिक अटैचमेंट डाउनलोड करने के लिए VBA एडिटर का उपयोग कर सकते हैं।
- अपने Documents फोल्डर को खोलें और "Attachments" नामक एक नया फोल्डर बनाएं। यहीं आपके अटैचमेंट डाउनलोड होंगे।
- माइक्रोसॉफ्ट आउटलुक खोलें।
- अपने कीबोर्ड पर Alt और F11 कुंजियां दबाकर VBA एडिटर खोलें।
- Microsoft Outlook Object पर राइट-क्लिक करें > Insert > Insert Module चुनें।
- निम्न कोड को एडिटर में कॉपी करें और Enter दबाएं:
Dim GCount As Integer
Dim GFilepath As String
Public Sub SaveAttachments()
'Update 20200821
Dim xMailItem As Outlook.MailItem
Dim xAttachments As Outlook.Attachments
Dim xSelection As Outlook.Selection
Dim i As Long
Dim xAttCount As Long
Dim xFilePath As String, xFolderPath As String, xSaveFiles As String
On Error Resume Next
xFolderPath = CreateObject("WScript.Shell").SpecialFolders(16)
Set xSelection = Outlook.Application.ActiveExplorer.Selection
xFolderPath = xFolderPath & "\Attachments\"
If VBA.Dir(xFolderPath, vbDirectory) = vbNullString Then
VBA.MkDir xFolderPath
End If
GFilepath = ""
For Each xMailItem In xSelection
Set xAttachments = xMailItem.Attachments
xAttCount = xAttachments.Count
xSaveFiles = ""
If xAttCount > 0 Then
For i = xAttCount To 1 Step -1
GCount = 0
xFilePath = xFolderPath & xAttachments.Item(i).FileName
GFilepath = xFilePath
xFilePath = FileRename(xFilePath)
If IsEmbeddedAttachment(xAttachments.Item(i)) = False Then
xAttachments.Item(i).SaveAsFile xFilePath
If xMailItem.BodyFormat <> olFormatHTML Then
xSaveFiles = xSaveFiles & vbCrLf & ""
Else
xSaveFiles = xSaveFiles & "
" & "" & xFilePath & ""
End If
End If
Next i
End If
Next
Set xAttachments = Nothing
Set xMailItem = Nothing
Set xSelection = Nothing
End Sub
Function FileRename(FilePath As String) As String
Dim xPath As String
Dim xFso As FileSystemObject
On Error Resume Next
Set xFso = CreateObject("Scripting.FileSystemObject")
xPath = FilePath
FileRename = xPath
If xFso.FileExists(xPath) Then
GCount = GCount + 1
xPath = xFso.GetParentFolderName(GFilepath) & "\" & xFso.GetBaseName(GFilepath) & " " & GCount & "." + xFso.GetExtensionName(GFilepath)
FileRename = FileRename(xPath)
End If
xFso = Nothing
End Function
Function IsEmbeddedAttachment(Attach As Attachment)
Dim xItem As MailItem
Dim xCid As String
Dim xID As String
Dim xHtml As String
On Error Resume Next
IsEmbeddedAttachment = False
Set xItem = Attach.Parent
If xItem.BodyFormat <> olFormatHTML Then Exit Function
xCid = ""
xCid = Attach.PropertyAccessor.GetProperty("https://schemas.microsoft.com/mapi/proptag/0x3712001F")
If xCid <> "" Then
xHtml = xItem.HTMLBody
xID = "cid:" & xCid
If InStr(xHtml, xID) > 0 Then
IsEmbeddedAttachment = True
End If
End If
End Function
नोट: आप ऊपर दिए गए मूल कोड को Extend Office से कॉपी करके एडिटर में पेस्ट कर सकते हैं।
- स्क्रिप्ट चलाने के लिए F5 दबाएं। आपको एक पॉप-अप विंडो मिल सकती है जो आपको कार्रवाई की अनुमति देने के लिए कहेगी।
बाहरी टूल का उपयोग करना
यदि आप आउटलुक के किसी अन्य संस्करण का उपयोग कर रहे हैं, PST के अलावा किसी अन्य फ़ाइल प्रकार को डाउनलोड करना चाहते हैं, या VBA विधि बोझिल लगती है, तो आप एक ऐसा टूल डाउनलोड कर सकते हैं जो आपको एक साथ एकाधिक आउटलुक अटैचमेंट डाउनलोड करने में मदद कर सके।
आउटलुक अटैचमेंट एक्सट्रैक्टर जैसे ऐप्स में न केवल PST फ़ाइलों से, बल्कि OST, BAK, MSG, OLK, और OLM फ़ाइलों जैसे अन्य फ़ाइल प्रारूपों से भी अटैचमेंट सहेजने की कार्यक्षमता होती है। आप ऐप को फ़ाइल आकार, तिथि, या प्रेषक के आधार पर अटैचमेंट फ़िल्टर करने के लिए भी कॉन्फ़िगर कर सकते हैं।
भ्रष्ट फ़ाइल से सभी अटैचमेंट कैसे डाउनलोड करें
यदि आप आउटलुक में फ़ाइल अटैचमेंट खोल, देख या सहेज नहीं सकते हैं, तो माइक्रोसॉफ्ट आउटलुक PST फ़ाइल भ्रष्ट या क्षतिग्रस्त हो सकती है। आप SCANPST.exe एप्लिकेशन जैसे टूल का उपयोग करके PST फ़ाइल की मरम्मत करके अटैचमेंट पुनर्प्राप्त कर सकते हैं।
इस टूल का उपयोग करने के लिए, आउटलुक बंद करें और अपने आउटलुक संस्करण के आधार पर निम्न स्थानों में से किसी एक पर जाएं:
- आउटलुक 2019: C:\Program Files (x86)\Microsoft Office\root\Office16
- आउटलुक 2016: C:\Program Files (x86)\Microsoft Office\root\Office16
- आउटलुक 2013: C:\Program Files (x86)\Microsoft Office\Office15
- आउटलुक 2010: C:\Program Files (x86)\Microsoft Office\Office14
- आउटलुक 2007: C:\Program Files (x86)\Microsoft Office\Office12
फिर, SCANPST.EXE पर डबल-क्लिक करें।
Browse चुनें, वह आउटलुक डेटा फ़ाइल ढूंढें जिसे आप स्कैन करना चाहते हैं और Start दबाएं।
यदि टूल को त्रुटियां मिलती हैं, तो उन्हें ठीक करने का प्रयास करने के लिए Repair चुनें। एक बार पूरा होने पर, आउटलुक पुनः आरंभ करें और जांचें कि क्या यह अब काम करता है।
अपनी ईमेल गतिविधियों को सुव्यवस्थित करें
आउटलुक से एकाधिक फ़ाइलें डाउनलोड करना आसान है और आप एक साथ कई ईमेल से एकाधिक फ़ाइलें भी डाउनलोड कर सकते हैं। यदि आपको आउटलुक में अंतर्निहित विधियां बहुत कठिन लगती हैं, तो आप आउटलुक अटैचमेंट एक्सट्रैक्टर जैसे टूल डाउनलोड कर सकते हैं जो आपकी मदद करेंगे।