Πώς να αφαιρέσετε όλα τα συνημμένα από το email στο Outlook;
Κανονικά όταν κάνετε προεπισκόπηση ενός email, μπορείτε να διαγράψετε ένα συνημμένο με δεξί κλικ και να επιλέξετε το Κατάργηση συνημμένου είδος. Μερικές φορές μπορεί να υπάρχουν πολλά συνημμένα σε ένα μήνυμα email και θα είναι κουραστικό να τα αφαιρέσετε ένα προς ένα. Εδώ σας κανονίζουμε με δύο εύκολα κόλπα για την κατάργηση όλων των συνημμένων σε ένα email και την κατάργηση όλων των συνημμένων από πολλά μηνύματα ηλεκτρονικού ταχυδρομείου, καθώς και στο Outlook.
Μη αυτόματη κατάργηση όλων των συνημμένων σε ένα μήνυμα email στο Outlook
Καταργήστε όλα τα συνημμένα από πολλά μηνύματα email στο Outlook με κώδικα VBA
Καταργήστε εύκολα όλα τα συνημμένα από ένα ή περισσότερα μηνύματα ηλεκτρονικού ταχυδρομείου με το Kutools for Outlook
Μη αυτόματη κατάργηση όλων των συνημμένων σε ένα μήνυμα email στο Outlook
Είναι εύκολο να αφαιρέσετε όλα τα συνημμένα σε επιλεγμένα μηνύματα email με το Κατάργηση συνημμένων δυνατότητα στο Outlook.
Βήμα 1: Επιλέξτε το μήνυμα ηλεκτρονικού ταχυδρομείου του οποίου τα συνημμένα θα καταργήσετε αργότερα.
Βήμα 2: Κάντε κλικ σε ένα από τα συνημμένα στο παράθυρο ανάγνωσης για να ενεργοποιήσετε τα Εργαλεία συνημμένων.
Βήμα 3: Κάντε κλικ στο Επιλογή Όλων στο κουμπί Επιλογή ομάδα για το συνημμένα Tab.
Αυτό το βήμα θα σας επιτρέψει να επιλέξετε όλα τα συνημμένα σε αυτά τα επιλεγμένα μηνύματα email ταυτόχρονα.
Βήμα 4: Κάντε κλικ στο Κατάργηση συνημμένου στο κουμπί Δράσεις ομάδα για το συνημμένα Tab.
Βήμα 5: Στο παράθυρο διαλόγου προειδοποίησης, κάντε κλικ στο Κατάργηση συνημμένων κουμπί.
Στη συνέχεια, όλα τα συνημμένα σε αυτά τα επιλεγμένα μηνύματα email διαγράφονται το συντομότερο δυνατό.
Note: Η δυνατότητα Κατάργηση συνημμένων λειτουργεί καλά στο Outlook 2010 και στην νεότερη έκδοση, αλλά όχι στο Outlook 2007.
Καταργήστε εύκολα όλα τα συνημμένα από πολλά επιλεγμένα μηνύματα ηλεκτρονικού ταχυδρομείου στο Outlook:
Με την Αποσύνδεση όλων των συνημμένων χρησιμότητα του Kutools για Excel, μπορείτε εύκολα να καταργήσετε όλα τα συνημμένα από πολλά επιλεγμένα μηνύματα ηλεκτρονικού ταχυδρομείου όπως φαίνεται στην παρακάτω επίδειξη (Τα συνημμένα θα αποθηκευτούν σε έναν καθορισμένο φάκελο) Κατεβάστε και δοκιμάστε τώρα! (Δωρεάν διαδρομή 30 ημερών)
Καταργήστε όλα τα συνημμένα από πολλά μηνύματα email στο Outlook με κώδικα VBA
Εάν θέλετε να καταργήσετε όλα τα συνημμένα από πολλά μηνύματα email στο Microsoft Outlook, η ακόλουθη μέθοδος θα σας βοηθήσει να το κάνετε εύκολα. Σας προτείνουμε ενεργοποιήστε όλες τις μακροεντολές στο Microsoft Outlook Πρώτα.
Βήμα 1: Μεταβείτε στο φάκελο του Το έγγραφό μου, δημιουργήστε έναν νέο φάκελο και ονομάστε τον ως OL συνημμένα
Βήμα 2: Επιλέξτε πολλά μηνύματα email των οποίων τα συνημμένα θα καταργήσετε αργότερα.
Σημείωση: Μπορείτε να επιλέξετε διαδοχικά μηνύματα email με το πάτημα του Ctrl κλειδί και κάνοντας κλικ.
Μπορείτε να επιλέξετε διαδοχικά μηνύματα email με το πάτημα του αλλαγή κλειδί και κάνοντας κλικ.
Βήμα 3: Ανοίξτε το VBA Editor πατώντας το άλλος κλειδί και F11 κλειδί ταυτόχρονα.
Βήμα 4: Αναπτύξτε το Project1 > Αντικείμενα του Microsoft Outlook στην αριστερή γραμμή και, στη συνέχεια, κάντε διπλό κλικ στο Αυτό το OutlookSession για να το ανοίξετε στον Επεξεργαστή. Δείτε το παρακάτω στιγμιότυπο οθόνης:
Βήμα 5: Αντιγράψτε και επικολλήστε τον ακόλουθο κώδικα VBA στο παράθυρο επεξεργασίας.
Public Sub ReplaceAttachmentsToLink()
Dim objApp As Outlook.Application
Dim aMail As Outlook.MailItem 'Object
Dim oAttachments As Outlook.Attachments
Dim oSelection As Outlook.Selection
Dim i As Long
Dim iCount As Long
Dim sFile As String
Dim sFolderPath As String
Dim sDeletedFiles As String
' Get the path to your My Documents folder
sFolderPath = CreateObject("WScript.Shell").SpecialFolders(16)
On Error Resume Next
' Instantiate an Outlook Application object.
Set objApp = CreateObject("Outlook.Application")
' Get the collection of selected objects.
Set oSelection = objApp.ActiveExplorer.Selection
' Set the Attachment folder.
sFolderPath = sFolderPath & "\OLAttachments"
' Check each selected item for attachments. If attachments exist,
' save them to the Temp folder and strip them from the item.
For Each aMail In oSelection
' This code only strips attachments from mail items.
' If aMail.class=olMail Then
' Get the Attachments collection of the item.
Set oAttachments = aMail.Attachments
iCount = oAttachments.Count
If iCount > 0 Then
' We need to use a count down loop for removing items
' from a collection. Otherwise, the loop counter gets
' confused and only every other item is removed.
For i = iCount To 1 Step -1
' Save attachment before deleting from item.
' Get the file name.
sFile = oAttachments.Item(i).FileName
' Combine with the path to the Temp folder.
sFile = sFolderPath & "\" & sFile
' Save the attachment as a file.
oAttachments.Item(i).SaveAsFile sFile
' Delete the attachment.
oAttachments.Item(i).Delete
'write the save as path to a string to add to the message
'check for html and use html tags in link
If aMail.BodyFormat <> olFormatHTML Then
sDeletedFiles = sDeletedFiles & vbCrLf & "<file://" & sFile & ">"
Else
sDeletedFiles = sDeletedFiles & "<br>" & "<a href='file://" & _
sFile & "'>" & sFile & "</a>"
End If
Next i
'End If
' Adds the filename string to the message body and save it
' Check for HTML body
If aMail.BodyFormat <> olFormatHTML Then
aMail.Body = aMail.Body & vbCrLf & _
"The file(s) were saved to " & sDeletedFiles
Else
aMail.HTMLBody = aMail.HTMLBody & "<p>" & _
"The file(s) were saved to " & sDeletedFiles & "</p>"
End If
aMail.Save
'sets the attachment path to nothing before it moves on to the next message.
sDeletedFiles = ""
End If
Next 'end aMail
ExitSub:
Set oAttachments = Nothing
Set aMail = Nothing
Set oSelection = Nothing
Set objApp = Nothing
End Sub
Βήμα 6: Πατήστε το πλήκτρο του F5 για να εκτελέσετε αυτόν τον κωδικό VBA.
Τώρα όλα τα συνημμένα από επιλεγμένα μηνύματα email καταργούνται, αφήνοντας υπερσυνδέσμους σε κάθε διαγραμμένο συνημμένο στο κάτω μέρος όλων των επιλεγμένων μηνυμάτων email.
Καταργήστε εύκολα όλα τα συνημμένα από ένα ή περισσότερα μηνύματα ηλεκτρονικού ταχυδρομείου με το Kutools for Outlook
Η Αποσύνδεση όλων χρησιμότητα συνημμένων του Kutools για το Outlook μπορεί να αφαιρέσει γρήγορα όλα τα συνημμένα από ένα ή περισσότερα επιλεγμένα μηνύματα ηλεκτρονικού ταχυδρομείου στο Outlook. Κάντε τα εξής.
Kutools για το Outlook : με περισσότερα από 100 εύχρηστα πρόσθετα του Outlook, δωρεάν να δοκιμάσετε χωρίς περιορισμό σε 60 ημέρες.
1. Επιλέξτε ένα ή περισσότερα μηνύματα email με τα συνημμένα που θέλετε να καταργήσετε και, στη συνέχεια, κάντε κλικ στο Kutools > Εργαλεία συνημμένου > Αποσύνδεση όλων. Δείτε το στιγμιότυπο οθόνης:
2. Στο Αποσύνδεση ρυθμίσεων πλαίσιο διαλόγου, διαμορφώστε τα εξής.
- 2.1 Κάντε κλικ στο Αναζήτηση κουμπί για να επιλέξετε ένα φάκελο για να αποθηκεύσετε όλα τα διαγραμμένα συνημμένα.
- 2.2 Από προεπιλογή, το Αποσυνδέστε τα συνημμένα στο παρακάτω στυλ είναι επιλεγμένο το πλαίσιο, ορίστε μια επιλογή για να αποθηκεύσετε τα συνημμένα σε διαφορετικούς φακέλους με βάση τα email που χρειάζεστε.
- 2.3 Κάντε κλικ στο OK κουμπί. Δείτε το στιγμιότυπο οθόνης:
3. Κάντε κλικ στο κουμπί Ναι στο κουμπί Αποσύνδεση όλων κουτί διαλόγου.
4. Τότε α Kutools για το Outlook θα εμφανιστεί ένα παράθυρο διαλόγου για να σας πει πόσα συνημμένα διαγράφονται. Κάντε κλικ στο OK κουμπί.
Τώρα όλα τα συνημμένα καταργούνται αμέσως με μόνο τους υπερσυνδέσμους που αφήνονται σε επιλεγμένα email. Μπορείτε να κάνετε κλικ στον υπερσύνδεσμο για να ανοίξετε το αντίστοιχο συνημμένο όπως χρειάζεστε.
Εάν θέλετε να έχετε μια δωρεάν δοκιμή (60-ημερών) αυτού του βοηθητικού προγράμματος, κάντε κλικ για να το κατεβάσετεκαι μετά πηγαίνετε για να εφαρμόσετε τη λειτουργία σύμφωνα με τα παραπάνω βήματα.
Τα καλύτερα εργαλεία παραγωγικότητας γραφείου
Kutools για το Outlook - Πάνω από 100 ισχυρές δυνατότητες για υπερφόρτιση του Outlook σας
🤖 Βοηθός αλληλογραφίας AI: Άμεσα επαγγελματικά email με μαγεία AI -- με ένα κλικ για ιδιοφυείς απαντήσεις, τέλειος τόνος, πολυγλωσσική γνώση. Μεταμορφώστε τα email χωρίς κόπο! ...
📧 Αυτοματοποίηση ηλεκτρονικού ταχυδρομείου: Εκτός γραφείου (Διαθέσιμο για POP και IMAP) / Προγραμματισμός αποστολής email / Αυτόματο CC/BCC βάσει κανόνων κατά την αποστολή email / Αυτόματη προώθηση (Σύνθετοι κανόνες) / Αυτόματη προσθήκη χαιρετισμού / Διαχωρίστε αυτόματα τα μηνύματα ηλεκτρονικού ταχυδρομείου πολλών παραληπτών σε μεμονωμένα μηνύματα ...
📨 Διαχείριση e-mail: Εύκολη ανάκληση email / Αποκλεισμός απάτης email από υποκείμενα και άλλους / Διαγραφή διπλότυπων μηνυμάτων ηλεκτρονικού ταχυδρομείου / Προχωρημένη Αναζήτηση / Ενοποίηση φακέλων ...
📁 Συνημμένα Pro: Μαζική αποθήκευση / Αποσύνδεση παρτίδας / Συμπίεση παρτίδας / Αυτόματη αποθήκευση / Αυτόματη απόσπαση / Αυτόματη συμπίεση ...
🌟 Διασύνδεση Magic: 😊Περισσότερα όμορφα και δροσερά emojis / Ενισχύστε την παραγωγικότητά σας στο Outlook με προβολές με καρτέλες / Ελαχιστοποιήστε το Outlook αντί να κλείσετε ...
???? Με ένα κλικ Wonders: Απάντηση σε όλους με εισερχόμενα συνημμένα / Email κατά του phishing / 🕘Εμφάνιση ζώνης ώρας αποστολέα ...
👩🏼🤝👩🏻 Επαφές & Ημερολόγιο: Μαζική προσθήκη επαφών από επιλεγμένα μηνύματα ηλεκτρονικού ταχυδρομείου / Διαχωρίστε μια ομάδα επαφής σε μεμονωμένες ομάδες / Κατάργηση υπενθυμίσεων γενεθλίων ...
Διανεμήθηκαν παραπάνω από 100 Χαρακτηριστικά Περιμένετε την εξερεύνηση σας! Κάντε κλικ εδώ για να ανακαλύψετε περισσότερα.