Πώς να αποτρέψετε τους χρήστες να στέλνουν μηνύματα ηλεκτρονικού ταχυδρομείου χωρίς θέμα που έχει εισαχθεί στο Outlook;
Ενώ στέλνετε ένα email μέσω του Outlook, μερικές φορές, μπορείτε να στέλνετε μηνύματα ηλεκτρονικού ταχυδρομείου χωρίς να εισάγετε θέμα που ίσως δεν είναι καλή συνήθεια. Υπάρχει τρόπος να αναγκάσετε τους χρήστες να στείλουν email με θέμα στο Outlook;
Αποτροπή αποστολής μηνυμάτων ηλεκτρονικού ταχυδρομείου χωρίς εισαγωγή θέματος με VBA
Αποτροπή αποστολής μηνυμάτων ηλεκτρονικού ταχυδρομείου χωρίς εισαγωγή θέματος με VBA
Δεν υπάρχει τρόπος εκτός από τον κώδικα VBA για την επίλυση αυτού του προβλήματος.
1. Ενεργοποιήστε το Outlook, πατήστε Alt + F11 κλειδιά για άνοιγμα Microsoft Visual Basic για εφαρμογές παράθυρο.
2. Διπλό κλικ Αυτό το OutlookSession στο Project1 παράθυρο και, στη συνέχεια, αντιγράψτε και επικολλήστε τον παρακάτω κώδικα στο κενό σενάριο.
VBA: Αποτροπή αποστολής email χωρίς θέμα
Private Sub Application_ItemSend(ByVal Item As Object, Cancel As Boolean)
'UpdatebyExtendoffice20180511
Dim xObject As Object
On Error Resume Next
If Item.Class <> olMail Then Exit Sub
Set xObject = CreateObject("VBScript.Regexp")
With xObject
.Global = True: .Pattern = "^\x20*$"
If .test(Item.Subject) = True Then
MsgBox "No subject entered", vbInformation, "Kutools for Outlook"
Cancel = True
End If
End With
End Sub
3. Αποθηκεύστε τον κωδικό, τώρα εάν το email που στέλνετε χωρίς θέμα, θα εμφανιστεί ένα παράθυρο διαλόγου για να υπενθυμίσετε την εισαγωγή θέματος.
Σημείωση: Αυτός ο κώδικας VBA λειτουργεί για όλους τους λογαριασμούς στο Outlook
Τα καλύτερα εργαλεία παραγωγικότητας γραφείου
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 Χαρακτηριστικά Περιμένετε την εξερεύνηση σας! Κάντε κλικ εδώ για να ανακαλύψετε περισσότερα.
