Μετάβαση στο κύριο περιεχόμενο

Πώς να αρχειοθετήσετε χωρίς συνημμένα στο Outlook;

Σε γενικές γραμμές, η δυνατότητα αρχειοθέτησης του Outlook θα αποθηκεύσει όλα τα στοιχεία email, συμπεριλαμβανομένου του περιεχομένου email, της κεφαλίδας email, των συνημμένων email κ.λπ. Εδώ, θα παρουσιάσω δύο λύσεις για αρχειοθέτηση χωρίς συνημμένα στο Outlook.

Καρτέλα Office - Ενεργοποιήστε την επεξεργασία με καρτέλες και την περιήγηση στο Microsoft Office, κάνοντας την εργασία άνετη
Kutools for Outlook - Ενισχύστε το Outlook με 100+ προηγμένες δυνατότητες για ανώτερη απόδοση
Ενισχύστε το Outlook 2021 - 2010 ή το Outlook 365 με αυτές τις προηγμένες δυνατότητες. Απολαύστε μια ολοκληρωμένη δωρεάν δοκιμή 60 ημερών και αναβαθμίστε την εμπειρία ηλεκτρονικού ταχυδρομείου σας!

Αρχείο χωρίς συνημμένα από το VBA

Αυτή η μέθοδος θα εισαγάγει ένα VBA για τη διαγραφή όλων των συνημμένων από τον καθορισμένο φάκελο που θα αρχειοθετήσετε και, στη συνέχεια, μπορείτε να αρχειοθετήσετε χωρίς συνημμένα. Κάντε τα εξής:

1. Στην Ταχυδρομείο προβολή, επιλέξτε το φάκελο που θα αρχειοθετήσετε και πατήστε άλλος + F11 για να ανοίξετε το παράθυρο της Microsoft Visual Basic for Applications.

2. Κλίκ Κύριο θέμα > Μονάδα μέτρησηςκαι, στη συνέχεια, επικολλήστε κάτω από το VBA στο νέο παράθυρο λειτουργικής μονάδας.

VBA: Κατάργηση όλων των συνημμένων από τον επιλεγμένο φάκελο αλληλογραφίας στο Outlook

Public Sub SaveDeleteAttachments()
Dim xMailItem As Outlook.MailItem 'Object
Dim xAttachments As Outlook.Attachments
Dim i As Long
Dim xFolder As Folder
Dim xFilePath As String
Dim xFldPath As String
Dim xDeletedFilePath As String
On Error Resume Next
xFldPath = CreateObject("WScript.Shell").SpecialFolders(16)
xFldPath = xFldPath & "\MyAttachments"
If Dir(xFldPath, vbDirectory) = "" Then
MkDir xFldPath
End If
Set xFolder = Outlook.Application.ActiveExplorer.CurrentFolder
For Each xMailItem In xFolder.Items
If xMailItem.Class = olMail Then
Set xAttachments = xMailItem.Attachments
While xAttachments.Count > 0
xFilePath = xAttachments.Item(1).FileName
xFilePath = xFldPath & "\" & xFilePath
xAttachments.Item(1).SaveAsFile xFilePath
xAttachments.Item(1).Delete
If xMailItem.BodyFormat <> olFormatHTML Then
xDeletedFilePath = xDeletedFilePath & vbCrLf & "<file://" & xFilePath & ">"
Else
xDeletedFilePath = xDeletedFilePath & "
" & "" & xFilePath & "" End If Wend If xDeletedFilePath <> "" Then If xMailItem.BodyFormat <> olFormatHTML Then xMailItem.Body = "The file(s) were saved to: " & xDeletedFilePath & vbCrLf & xMailItem.Body Else xMailItem.HTMLBody = "

" & _ "The file(s) were saved to: " & xDeletedFilePath & "

" & xMailItem.HTMLBody End If xMailItem.Save xDeletedFilePath = "" End If End If Next Exit Sub: Set xAttachments = Nothing Set xMailItem = Nothing End Sub

3. πάτα το F5 ή κάντε κλικ στο τρέξιμο κουμπί για να εκτελέσετε τον κώδικα. Στη συνέχεια, όλα τα συνημμένα αφαιρούνται αμέσως από τον επιλεγμένο φάκελο αλληλογραφίας.

4. Κλίκ Αρχεία > Πληροφορίες > Εργαλεία > Καθαρίστε παλιά αντικείμενα Αρχεία > Πληροφορίες > Εργαλεία καθαρισμού > Αρχείο).

5. Στο παράθυρο διαλόγου Αρχειοθέτηση, κάντε κλικ για να επισημάνετε τον αντιγραμμένο φάκελο, πληκτρολογήστε ΣΉΜΕΡΑ στο Αρχειοθετήστε αντικείμενα παλαιότερα από πλαίσιο και, στη συνέχεια, κάντε κλικ στο Αναζήτηση κουμπί. Δείτε το στιγμιότυπο οθόνης:

6. Στο παράθυρο διαλόγου Open Outlook Data Files, ανοίξτε τον φάκελο στον οποίο θα αποθηκεύσετε το αρχειοθετημένο αρχείο PST, ονομάστε το αρχείο PST στο Όνομα αρχείου πλαίσιο και, στη συνέχεια, κάντε κλικ στο OK κουμπί. Δείτε το στιγμιότυπο οθόνης:

7. Τώρα επιστρέφετε στο παράθυρο διαλόγου Αρχείο, κάντε κλικ στο OK κουμπί για να ολοκληρώσετε την αρχειοθέτηση.
Μέχρι στιγμής, έχετε αρχειοθετήσει το φάκελο αλληλογραφίας χωρίς συνημμένα.


Αρχειοθέτηση χωρίς συνημμένα από το Kutools για Outlook

Εάν έχετε εγκαταστήσει το Kutools για Outlook, μπορείτε να το εφαρμόσετε Αποσύνδεση όλων δυνατότητα γρήγορης διαγραφής όλων των συνημμένων από τον καθορισμένο φάκελο που θα αρχειοθετήσετε και, στη συνέχεια, αρχειοθετείτε εύκολα χωρίς συνημμένα.

Kutools για το Outlook: Ultimate Outlook toolkit με πάνω από 100 εύχρηστα εργαλεία. Δοκιμάστε το ΔΩΡΕΑΝ για 60 ημέρες, χωρίς περιορισμούς, χωρίς ανησυχίες!   Διαβάστε περισσότερα ...   Ξεκινήστε τη δωρεάν δοκιμή τώρα!

1. Στην Ταχυδρομείο δείτε, ανοίξτε τον καθορισμένο φάκελο αλληλογραφίας που θα αρχειοθετήσετε, επιλέξτε όλα τα email πατώντας Ctrl + A και μετά κάντε κλικ στο κουμπί Kutools > Αποσύνδεση όλων. Δείτε το στιγμιότυπο οθόνης:

2. Στο παράθυρο διαλόγου Παρακαλώ επιλέξτε έναν φάκελο, κάντε κλικ στο Αναζήτηση κουμπί  για να καθορίσετε τον φάκελο στον οποίο θα αποθηκεύσετε το συνημμένο, καθορίστε ένα στυλ υποφάκελου από το δημιουργήστε υποφακέλους με το ακόλουθο στυλ αναπτυσσόμενη λίστα και κάντε κλικ στο Ok κουμπί. Δείτε το στιγμιότυπο οθόνης:

3. Παρακαλώ πατήστε Ναι κουμπί και OK κουμπί διαδοχικά στα αναδυόμενα παράθυρα διαλόγου.

4. Συνεχίστε για να κάνετε κλικ Αρχεία > Πληροφορίες > Εργαλεία > Καθαρίστε παλιά αντικείμενα Αρχεία > Πληροφορίες > Εργαλεία καθαρισμού > Αρχείο).

5. Στο παράθυρο διαλόγου Αρχειοθέτηση, κάντε κλικ για να επισημάνετε τον καθορισμένο φάκελο που θα αρχειοθετήσετε χωρίς συνημμένα, πληκτρολογήστε ΣΉΜΕΡΑ στο Αρχειοθετήστε αντικείμενα παλαιότερα από πλαίσιο και, στη συνέχεια, κάντε κλικ στο Αναζήτηση κουμπί. Δείτε το στιγμιότυπο οθόνης:

6. Στο παράθυρο διαλόγου Open Outlook Data Files, ανοίξτε τον φάκελο στον οποίο θα αποθηκεύσετε το αρχειοθετημένο αρχείο PST, ονομάστε το αρχείο PST στο Όνομα αρχείου πλαίσιο και, στη συνέχεια, κάντε κλικ στο OK κουμπί. Δείτε το στιγμιότυπο οθόνης:

7. Τώρα επιστρέφετε στο παράθυρο διαλόγου Αρχείο, κάντε κλικ στο OK κουμπί για να ολοκληρώσετε την αρχειοθέτηση.

Μέχρι στιγμής, έχετε ήδη αρχειοθετήσει τον καθορισμένο φάκελο αλληλογραφίας χωρίς συνημμένα.

Kutools για το Outlook: Φορτίστε το Outlook με πάνω από 100 εργαλεία που πρέπει να έχετε. Δοκιμάστε το ΔΩΡΕΑΝ για 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 Χαρακτηριστικά Περιμένετε την εξερεύνηση σας! Κάντε κλικ εδώ για να ανακαλύψετε περισσότερα.

 

 

Comments (0)
No ratings yet. Be the first to rate!
There are no comments posted here yet
Please leave your comments in English
Posting as Guest
×
Rate this post:
0   Characters
Suggested Locations