Πώς να στέλνετε πάντα ένα νέο email από συγκεκριμένο λογαριασμό στο Outlook;
Αν υποθέσουμε ότι έχετε δημιουργήσει πολλούς λογαριασμούς email στο Outlook σας, όταν στέλνετε ένα email στο Outlook, ο λογαριασμός email που εμφανίζεται στο πεδίο Από εξαρτάται από τον λογαριασμό στον οποίο βρίσκεστε αυτήν τη στιγμή. Ανεξάρτητα από τον λογαριασμό στον οποίο βρίσκεστε αυτήν τη στιγμή, θέλετε να στέλνετε πάντα νέο email από έναν συγκεκριμένο λογαριασμό email, το παρακάτω σεμινάριο μπορεί να σας βοηθήσει, η μέθοδος σε αυτό το σεμινάριο μπορεί να σας βοηθήσει.
Πάντα στέλνετε ένα νέο email από συγκεκριμένο λογαριασμό με κωδικό VBA
- Αυτοματοποιήστε την αποστολή email με Αυτόματο CC / BCC, Αυτόματη προώθηση με κανόνες? στείλετε Αυτόματη απάντηση (Εκτός γραφείου) χωρίς να απαιτείται διακομιστής ανταλλαγής...
- Λάβετε υπενθυμίσεις όπως Προειδοποίηση BCC όταν απαντάτε σε όλους όσο βρίσκεστε στη λίστα BCC και Υπενθύμιση όταν λείπουν συνημμένα για ξεχασμένα συνημμένα...
- Βελτιώστε την αποτελεσματικότητα του email με Απάντηση (Όλα) Με Συνημμένα, Αυτόματη προσθήκη χαιρετισμού ή ημερομηνίας και ώρας στην υπογραφή ή στο θέμα, Απάντηση σε πολλά email...
- Βελτιώστε την αποστολή email με Ανάκληση email, Εργαλεία συνημμένου (Συμπίεση όλων, Αυτόματη αποθήκευση όλων...), Κατάργηση διπλότυπων, να Γρήγορη αναφορά...
Πάντα στέλνετε ένα νέο email από συγκεκριμένο λογαριασμό με κωδικό VBA
Αυτός ο κωδικός VBA μπορεί να σας βοηθήσει να στείλετε εύκολα νέα μηνύματα ηλεκτρονικού ταχυδρομείου από συγκεκριμένο λογαριασμό στο Outlook. Κάντε τα εξής:
1. Πατήστε άλλος + F11 για να ανοίξετε το Microsoft Visual Basic για εφαρμογές κουτί διαλόγου.
2. Αναπτύξτε το Project1 > Αντικείμενα του Microsoft Outlook κάνοντας διπλό κλικ σε αυτά. Και μετά κάντε διπλό κλικ στο Αυτό το OutlookSession για να ανοίξετε το VbaProject.OTM κουτί διαλόγου.
3. Αντιγράψτε και επικολλήστε τον παρακάτω κώδικα VBA στο παράθυρο διαλόγου.
VBA: στέλνετε πάντα ένα νέο email από συγκεκριμένο λογαριασμό.
Public Sub NewBySpecAccount()
Dim oAccount As Outlook.Account
Dim oMail As Outlook.MailItem
For Each oAccount In Application.Session.Accounts
If oAccount.DisplayName = "Your account name" Then
Set oMail = Application.CreateItem(olMailItem)
oMail.SendUsingAccount = oAccount
oMail.Display
End If
Next
End Sub
4. Τώρα πρέπει να αλλάξετε το "Το όνομα του λογαριασμού σας"Στον λογαριασμό email που θέλετε να στέλνετε πάντα νέα email. Δείτε το στιγμιότυπο οθόνης:
5. Στη συνέχεια, πατήστε F5 πληκτρολογήστε το πληκτρολόγιο για να εκτελέσετε τον κωδικό VBA.
6. Μετά την εκτέλεση του κώδικα VBA, ένας νέος Μήνυμα θα εμφανιστεί το παράθυρο, συνθέστε το email σας και κάντε κλικ Αποστολή κουμπί για να το στείλετε.
Note: Αυτός ο κώδικας VBA έχει δοκιμαστεί επιτυχώς στο Outlook 2007, 2010 και 2013, αλλά δεν εκτελείται στο Exchange 2007 και 2010.
Τα καλύτερα εργαλεία παραγωγικότητας γραφείου
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 Χαρακτηριστικά Περιμένετε την εξερεύνηση σας! Κάντε κλικ εδώ για να ανακαλύψετε περισσότερα.