Note: The other languages of the website are Google-translated. Back to English

Πώς να μεταφέρετε μηνύματα ηλεκτρονικού ταχυδρομείου από άγνωστους αποστολείς σε συγκεκριμένο φάκελο στο Outlook; 

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

Μετακίνηση μηνυμάτων ηλεκτρονικού ταχυδρομείου από άγνωστους αποστολείς σε συγκεκριμένο φάκελο δημιουργώντας κανόνα

Μετακίνηση μηνυμάτων από άγνωστους αποστολείς σε συγκεκριμένο φάκελο εφαρμόζοντας τον κώδικα VBA


Μετακίνηση μηνυμάτων ηλεκτρονικού ταχυδρομείου από άγνωστους αποστολείς σε συγκεκριμένο φάκελο δημιουργώντας κανόνα

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

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

doc μετακινήστε email από άγνωστο 1

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

doc μετακινήστε email από άγνωστο 2

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

doc μετακινήστε email από άγνωστο 3

4. και κάντε κλικ OK για να μεταβείτε στο Οδηγός κανόνα, Κλίκ Εφαρμογή κανόνα στο μήνυμα που λαμβάνω Επιλογή από το Ξεκινήστε από έναν κενό κανόνα πλαίσιο ενότητας, δείτε το στιγμιότυπο οθόνης:

doc μετακινήστε email από άγνωστο 4

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

doc μετακινήστε email από άγνωστο 5

6. Και στο επόμενο παράθυρο διαλόγου, επιλέξτε μετακινήστε το στον καθορισμένο φάκελο επιλογή του Βήμα 1: Επιλογή ενεργειών πλαίσιο λίστας και, στη συνέχεια, κάντε κλικ στο συνδεδεμένο κείμενο καθορίζεται, και στο άνοιγμα Κανόνες και ειδοποιήσεις διαλόγου, καθορίστε το φάκελο στον οποίο θέλετε να μεταφέρετε τα μηνύματα ηλεκτρονικού ταχυδρομείου, δείτε το στιγμιότυπο οθόνης:

doc μετακινήστε email από άγνωστο 6

7. Κλίκ OK κουμπί και συνεχίστε να κάνετε κλικ Επόμενο κουμπί, σε αυτό Υπάρχουν εξαιρέσεις; διάλογος, ελέγξτε εκτός εάν ο αποστολέας βρίσκεται σε καθορισμένο Βιβλίο Διευθύνσεων επιλογή του Βήμα 1: Επιλογή εξαιρέσεων πλαίσιο λίστας και, στη συνέχεια, κάντε κλικ στο συνδεδεμένο κείμενο καθορίζεται, Και ένα Προσθήκη λίστας διευθύνσεων θα εμφανιστεί το πλαίσιο, επιλέξτε έναν φάκελο επαφών που περιέχει τις επαφές που θέλετε να εξαιρέσετε, δείτε το στιγμιότυπο οθόνης:

doc μετακινήστε email από άγνωστο 7

8. Στη συνέχεια κάντε κλικ στο κουμπί Προσθέτω , και στη συνέχεια κάντε κλικ στο κουμπί OK Επόμενο για να μεταβείτε στον τελευταίο διάλογο οδηγού, πληκτρολογήστε ένα όνομα κανόνα στο Βήμα 1: Καθορίστε ένα όνομα για αυτόν τον κανόνα πλαίσιο κειμένου και επιλέξτε Ενεργοποιήστε αυτόν τον κανόνα Επιλογή από το Βήμα 2: Κανόνας εγκατάστασης ενότητα επιλογών. Δείτε το στιγμιότυπο οθόνης:

doc μετακινήστε email από άγνωστο 8

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


Μετακίνηση μηνυμάτων από άγνωστους αποστολείς σε συγκεκριμένο φάκελο εφαρμόζοντας τον κώδικα VBA

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

1. Κρατήστε πατημένο το ALT + F11 για να ανοίξετε το Microsoft Visual Basic για εφαρμογές παράθυρο.

2. Στην Microsoft Visual Basic για εφαρμογές παράθυρο, κάντε διπλό κλικ Αυτό το OutlookSession από το Έργο1 (VbaProject.OTM) παράθυρο για να ανοίξετε τη λειτουργία και, στη συνέχεια, αντιγράψτε και επικολλήστε τον ακόλουθο κώδικα στην κενή μονάδα.

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

Public WithEvents MailItems As Outlook.Items
Private Sub Application_Startup()
    Set MailItems = Outlook.Application.Session.GetDefaultFolder(olFolderInbox).Items
End Sub
Private Sub MailItems_ItemAdd(ByVal item As Object)
Dim xSenderEmailAddress As String
Dim xContactItems As Outlook.Items
Dim xContactItem As ContactItem
Dim I As Long
Dim xFilter As String
Dim xTargetFolder As Folder
Dim xContactFolder As Folder
Dim xStore As Store
Dim xInboxFlds As Folders
Dim xSubFolder As Folder
Dim xFound As Boolean
On Error Resume Next
If item.Class = olMail Then
    xSenderEmailAddress = item.SenderEmailAddress
End If
For Each xStore In Outlook.Application.Session.Stores
    Set xContactItems = xStore.GetDefaultFolder(olFolderContacts).Items
    For I = 3 To 1 Step -1
        xFilter = "[Email" & I & "Address] = " & xSenderEmailAddress
        Set xContactItem = xContactItems.Find(xFilter)
        If TypeName(xContactItem) <> "Nothing" Then Exit For
    Next
Next
If xContactItem Is Nothing Then
    Set xInboxFlds = Outlook.Application.Session.GetDefaultFolder(olFolderInbox).Folders
    xFound = False
    For Each xSubFolder In xInboxFlds
        If xSubFolder.Name = "Unknown" Then
            xFound = True
            Set xTargetFolder = Outlook.Application.Session.GetDefaultFolder(olFolderInbox).Folders("Unknown")
            Exit For
        End If
    Next
    If xFound = False Then
        Set xTargetFolder = Outlook.Application.Session.GetDefaultFolder(olFolderInbox).Folders.Add("Unknown")
    End If
    item.Move xTargetFolder
End If
End Sub

doc μετακινήστε email από άγνωστο 9

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

doc μετακινήστε email από άγνωστο 10

Note: Ο Άγνωστος ο φάκελος θα δημιουργηθεί αυτόματα όταν εισέρχονται κάποια άγνωστα μηνύματα ηλεκτρονικού ταχυδρομείου. Μπορείτε να αλλάξετε το όνομα του φακέλου "αγνοώ"Σε άλλους σε σενάριο.


Kutools για Outlook - Φέρνει 100 προηγμένες δυνατότητες στο Outlook και κάνει την εργασία πολύ πιο εύκολη!

  • Αυτόματο CC / BCC με κανόνες κατά την αποστολή email · Αυτόματη προώθηση Πολλαπλά μηνύματα ηλεκτρονικού ταχυδρομείου κατά παραγγελία. Αυτόματη απάντηση χωρίς διακομιστή ανταλλαγής και περισσότερες αυτόματες δυνατότητες ...
  • Προειδοποίηση BCC - εμφάνιση μηνύματος όταν προσπαθείτε να απαντήσετε σε όλα εάν η διεύθυνση αλληλογραφίας σας βρίσκεται στη λίστα BCC; Υπενθύμιση όταν λείπουν συνημμένακαι περισσότερες λειτουργίες υπενθύμισης ...
  • Απάντηση (Όλα) Με όλα τα συνημμένα στη συνομιλία μέσω ταχυδρομείου; Απάντηση σε πολλά email σε δευτερόλεπτα; Αυτόματη προσθήκη χαιρετισμού κατά την απάντηση Προσθήκη ημερομηνίας στο θέμα ...
  • Εργαλεία συνημμένων: Διαχείριση όλων των συνημμένων σε όλα τα μηνύματα, Αυτόματη απόσπαση, Συμπίεση όλων, Μετονομασία όλων, Αποθήκευση όλων ... Γρήγορη αναφορά, Καταμέτρηση επιλεγμένων μηνυμάτων...
  • Ισχυρά ανεπιθύμητα email κατά παραγγελία? Κατάργηση διπλότυπων μηνυμάτων και επαφών... Σας επιτρέπουν να κάνετε πιο έξυπνα, πιο γρήγορα και καλύτερα στο Outlook.
shot kutools outlook kutools καρτέλα 1180x121
shot kutools outlook kutools συν καρτέλα 1180x121
 
Σχόλια (0)
Δεν υπάρχουν ακόμη βαθμολογίες. Γίνε ο πρώτος που θα αξιολογήσετε!
Δεν υπάρχουν σχόλια δημοσιεύτηκε ακόμα
Αφήστε τα σχόλιά σας
Δημοσίευση ως επισκέπτης
×
Αξιολογήστε αυτήν την ανάρτηση:
0   Χαρακτήρες
Προτεινόμενες τοποθεσίες

Ακολουθησε μας

Πνευματικά δικαιώματα © 2009 - www.extendoffice.com. | Ολα τα δικαιώματα διατηρούνται. Τροφοδοτείται από ExtendOffice. | Sitemap
Το Microsoft και το λογότυπο του Office είναι εμπορικά σήματα ή σήματα κατατεθέντα της Microsoft Corporation στις Ηνωμένες Πολιτείες ή / και σε άλλες χώρες.
Προστατεύεται από το Sectigo SSL