Εάν έχετε διαμορφώσει πολλούς λογαριασμούς email στο Outlook και θέλετε να χρησιμοποιήσετε διαφορετικές γραμματοσειρές σε εξερχόμενα email σύμφωνα με διαφορετικούς λογαριασμούς email που χρησιμοποιούνται για την αποστολή, μπορείτε να χρησιμοποιήσετε την προσέγγιση που εισάγεται σε αυτό το άρθρο.
Πολλοί χρήστες ελπίζουν ότι το Outlook μπορεί να επιλέξει αυτόματα και να χρησιμοποιήσει διαφορετικές γραμματοσειρές σε εξερχόμενα email με βάση διαφορετικούς λογαριασμούς email που χρησιμοποιούν για την αποστολή. Ωστόσο, από προεπιλογή, το Outlook δεν διαθέτει μια τέτοια δυνατότητα. Ευτυχώς, μπορείτε ακόμα να το καταλάβετε με τη βοήθεια του κώδικα VBA. Τώρα, θα αποκαλύψουμε λεπτομερώς αυτήν τη μέθοδο.
Αυτόματη χρήση διαφορετικών γραμματοσειρών για διαφορετικούς λογαριασμούς κατά την αποστολή email
- Αρχικά, ξεκινήστε την εφαρμογή Outlook.
- Στη συνέχεια, στο επόμενο κύριο παράθυρο του Outlook, πρέπει να πατήσετε τα πλήκτρα "Alt + F11".
- Στη συνέχεια, θα εισαγάγετε ένα νέο παράθυρο - "Microsoft Visual Basic for Applications".
- Σε αυτό το παράθυρο, θα χρειαστεί να βρείτε και να ανοίξετε το έργο "ThisOutlookSession".
- Στη συνέχεια, αντιγράψτε και επικολλήστε τον ακόλουθο κώδικα VBA σε αυτό το έργο.
'Occurs when you click "Send" button
Private Sub Application_ItemSend(ByVal Item As Object, Cancel As Boolean)
Dim objMail As MailItem
Dim objMailDocument As Word.Document
If TypeOf Item Is MailItem Then
Set objMail = Item
Set objMailDocument = objMail.GetInspector.WordEditor
'Use different fonts based on different send using account
'Change the accounts and fonts as per your needs
Select Case objMail.SendUsingAccount
Case "johnsmith@datanumen.com"
With objMailDocument.Range.Font
.Name = "Times New Roman"
.Size = 13
.ColorIndex = wdBlue
End With
Case "team1@datanumen.com"
With objMailDocument.Range.Font
.Name = "Cambria"
.Size = 10
.ColorIndex = wdBlack
End With
Case "johnsmith_jonny@outlook.com"
With objMailDocument.Range.Font
.Name = "Segoe Script"
.Size = 8
.ColorIndex = wdDarkYellow
End With
End Select
objMail.Save
End If
End Sub
- Μετά από αυτό, καλύτερα να υπογράψετε αυτόν τον κωδικό.
- Αρχικά, κάντε κλικ στο κουμπί "Εργαλεία" στη γραμμή εργαλείων.
- Στη συνέχεια, επιλέξτε "Ψηφιακή υπογραφή" από την αναπτυσσόμενη λίστα.
- Αργότερα μπορείτε να ακολουθήσετε τις οδηγίες στην οθόνη για να ολοκληρώσετε αυτήν την εργασία.
- Στη συνέχεια, μπορείτε να βγείτε από το τρέχον παράθυρο και να προχωρήσετε στην αλλαγή των ρυθμίσεων μακροεντολών του Outlook για να επιτρέψετε τα υπογεγραμμένα έργα VBA.
- Από τώρα και στο εξής, κάθε φορά που στέλνετε ένα email, το Outlook θα αλλάζει αυτόματα τις γραμματοσειρές στα εξερχόμενα email σύμφωνα με τον λογαριασμό email για αποστολή.
Συνεχίστε να είστε προετοιμασμένοι για μη αναμενόμενο σφάλμα του Outlook
Λόγω της ευπάθειας του Outlook, οι χρήστες πρέπει να είναι καλά προετοιμασμένοι για διάφορα προβλήματα όταν ασχολούνται με το Outlook συνεχώς. Χωρίς καμία αμφιβολία, ένα από τα πιο σημαντικά βήματα είναι η δημιουργία ενός συνεπούς και ενημερωμένου αντιγράφου ασφαλείας για τα δεδομένα του Outlook. Με τέτοια αντίγραφα ασφαλείας, ακόμα κι αν τα αρχικά δεδομένα του Outlook καταστραφούν σε περίπτωση σφάλματος, μπορείτε ακόμα να... ανακτήστε το Outlook δεδομένα από αντίγραφα ασφαλείας με απόλυτη ευκολία. Επιπλέον, συνιστάται επίσης να εξοπλίσετε το Outlook σας με ένα ισχυρό εργαλείο επιδιόρθωσης, όπως DataNumen Outlook Repair. Θα είναι χρήσιμο όταν αποτύχουν τα αντίγραφα ασφαλείας.
Εισαγωγή συγγραφέα:
Η Shirley Zhang είναι ειδικός ανάκτησης δεδομένων στο DataNumen, Inc., η οποία είναι ο παγκόσμιος ηγέτης στις τεχνολογίες ανάκτησης δεδομένων, συμπεριλαμβανομένων sql διαφθορά και προϊόντα λογισμικού επισκευής προοπτικών. Για περισσότερες πληροφορίες επισκεφθείτε www.datanumen.com