Si vous avez configuré plusieurs comptes de messagerie dans votre Outlook et souhaitez utiliser différentes polices dans les e-mails sortants selon les différents comptes de messagerie utilisés pour l'envoi, vous pouvez utiliser l'approche présentée dans cet article.
De nombreux utilisateurs espèrent qu'Outlook peut sélectionner et utiliser automatiquement différentes polices dans les e-mails sortants en fonction des différents comptes de messagerie qu'ils utilisent pour l'envoi. Cependant, par défaut, Outlook ne dispose pas d'une telle fonctionnalité. Heureusement, vous pouvez toujours le réaliser à l'aide du code VBA. Maintenant, nous allons révéler cette méthode en détail.
Utiliser automatiquement différentes polices pour différents comptes lors de l'envoi d'e-mails
- Pour commencer, ouvrez votre application Outlook.
- Ensuite, dans la fenêtre principale Outlook suivante, vous devez appuyer sur les touches "Alt + F11".
- Ensuite, vous entrerez dans une nouvelle fenêtre - "Microsoft Visual Basic pour Applications".
- Dans cette fenêtre, vous devrez rechercher et ouvrir le projet "ThisOutlookSession".
- Ensuite, copiez et collez le code VBA suivant dans ce projet.
'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
- Après cela, vous feriez mieux de signer ce code.
- Tout d'abord, cliquez sur le bouton "Outils" dans la barre d'outils.
- Choisissez ensuite l'option "Signature numérique" dans la liste déroulante.
- Plus tard, vous pourrez suivre les instructions à l'écran pour effectuer cette tâche.
- Ensuite, vous pouvez quitter la fenêtre actuelle et procéder à la modification de vos paramètres de macro Outlook pour autoriser les projets VBA signés.
- À partir de maintenant, chaque fois que vous envoyez un e-mail, Outlook modifie automatiquement les polices dans les e-mails sortants en fonction du compte de messagerie pour l'envoi.
Restez prêt pour un crash Outlook inattendu
En raison de la vulnérabilité d'Outlook, les utilisateurs doivent se préparer à divers problèmes lorsqu'ils utilisent régulièrement ce logiciel. Sans aucun doute, l'une des mesures les plus importantes consiste à effectuer une sauvegarde régulière et à jour de leurs données Outlook. Grâce à ces sauvegardes, même si les données Outlook originales sont endommagées suite à un plantage, vous pouvez toujours les récupérer. récupérer Outlook Récupérez vos données de sauvegarde en toute simplicité. De plus, il est conseillé d'équiper Outlook d'un outil de réparation performant, tel que… DataNumen Outlook Repair. Il sera utile lorsque les sauvegardes échouent.
Introduction de l'auteur:
Shirley Zhang est une experte en récupération de données dans DataNumen, Inc., qui est le leader mondial des technologies de récupération de données, y compris corruption sql et produits logiciels de réparation Outlook. Pour plus d'informations, visitez www.datanumen.com