Comment ajouter automatiquement un texte par défaut dans la ligne d’objet d’un message Outlook ?

Existe-t-il un moyen d’ajouter automatiquement un texte par défaut à l’objet lors de la création d’un nouvel e-mail dans Outlook ? Cet article présente plusieurs méthodes efficaces pour résoudre ce problème.

Ajouter automatiquement un texte par défaut à la ligne d’objet avec du code VBA

Ajouter automatiquement un texte par défaut à la ligne d’objet avec Kutools pour Outlook

---

Ajouter automatiquement un texte par défaut à la ligne d’objet avec du code VBA

Pour ajouter automatiquement un texte par défaut à la ligne d’objet, utilisez le code VBA suivant.

1. Maintenez les touches « Alt » + « F11 » enfoncées pour ouvrir la fenêtre « Microsoft Visual Basic pour Applications ».

2. Dans la fenêtre « Microsoft Visual Basic pour Applications », double-cliquez sur « ThisOutlookSession » sous « Projet1 (VbaProject.OTM) » pour ouvrir le module, puis copiez-collez le code suivant dans le module vide.

Code VBA : Ajouter automatiquement un texte par défaut à la ligne d’objet

Public xFlag As Boolean
Private Sub Application_ItemSend(ByVal Item As Object, Cancel As Boolean)
Dim xText As String
On Error Resume Next
If xFlag = False Then
    xText = "Skyyang-"
    If InStr(Item.Subject, xText) = False Then
L1:     xText = InputBox("Input Subject", "Kutools for Outlook", xText)
        If xText = "" Then
            xFlag = False
            Cancel = True
            Exit Sub
        End If
        Item.Subject = xText & " " & Item.Subject
        xFlag = True
        Cancel = True
    End If
Else
    xFlag = False
    xText = "Skyyang-"
    If InStr(Item.Subject, xText) = False Then
      GoTo L1
    End If
End If
End Sub

Remarque : dans ce code, le texte « Skyyang- » correspond au texte que vous souhaitez ajouter par défaut à la ligne d’objet. Remplacez-le par votre propre texte.

3. Appuyez sur « Alt » + « Q » pour fermer la fenêtre « Microsoft Visual Basic pour Applications ».

Vous devez maintenant créer un nouvel e-mail pour tester le résultat.

4. Créez un nouvel e-mail, saisissez le destinataire dans le champ « À », puis indiquez l’objet dans la ligne « Objet ». Cliquez ensuite sur le bouton « Envoyer » : une boîte de dialogue s’affichera pour vous demander si vous souhaitez ajouter le texte par défaut à la ligne d’objet.

5. Cliquez sur le bouton « OK » pour que le texte par défaut soit automatiquement inséré avant le contenu de l’objet.

---

Ajouter automatiquement un texte par défaut à la ligne d’objet avec Kutools pour Outlook

Voici une méthode simple pour ajouter automatiquement un texte par défaut à la ligne d’objet. Grâce à l’utilitaire « Kutools pour Outlook », vous accomplirez cette tâche en un clin d’œil.

1. Lancez Outlook, puis cliquez sur « Kutools » > « Options ».

2. Dans la boîte de dialogue « Options », cliquez sur l’onglet « Nouveau », cochez l’option « Ajouter la date à l’objet lors de la création d’un(e) Nouveau email », puis saisissez le texte par défaut que vous souhaitez voir apparaître automatiquement dans la ligne d’objet.

3. Cliquez sur le bouton « OK ». Désormais, dès que vous créerez un nouvel e-mail, le texte par défaut spécifié sera automatiquement inséré dans la ligne d’objet, comme illustré ci-dessous :