KutoolsforOffice — Une solution unique, cinq outils puissants.Faire plus avec moins d'efforts.Soldes de mars : 20 % de réduction

Comment recevoir une alerte lors de l’envoi d’un e-mail à un domaine externe dans Outlook ?

AuteurSiluvia Date de modification

L’envoi d’e-mails vers des domaines externes (c’est-à-dire en dehors de votre organisation) peut parfois provoquer des fuites accidentelles de données ou exposer à des risques de sécurité. Pour y remédier, vous pouvez configurer dans Outlook un avertissement qui vous alerte avant l’envoi d’un message à des destinataires externes. Dans ce tutoriel, je vous guide pas à pas à travers deux méthodes pour le mettre en place.

Utilisation de la fonctionnalité intégrée MailTips d’Outlook

Utilisation d’un code VBA


Utilisation de la fonctionnalité intégrée MailTips d’Outlook

L’avertissement «Le destinataire suivant se trouve en dehors de votre organisation» dans Outlook est une fonctionnalité pratique conçue pour alerter les utilisateurs lorsqu’ils envoient des e-mails à des destinataires externes. Intégrée à MailTips, cette fonctionnalité a été introduite avec Microsoft Outlook 2010 et est disponible pour les utilisateurs connectés à un serveur Microsoft Exchange. Découvrez ci-dessous un guide étape par étape expliquant son fonctionnement et sa gestion.

Fonctionnement

Lors de la rédaction d’un e-mail, Outlook vérifie automatiquement si le destinataire appartient à un domaine externe.

Si le destinataire se trouve en dehors de votre organisation, un message d’avertissement (« Le destinataire suivant se trouve en dehors de votre organisation ») s’affiche sous le champ des destinataires.

doc-warning-when-sending-email-to-external-domain-1

Cet avertissement permet aux utilisateurs de revoir leurs informations sensibles avant de les transmettre à des tiers externes.

Activation de la fonctionnalité

L’avertissement « Destinataire en dehors de votre organisation » est généralement activé par défaut pour les comptes Outlook connectés à un serveur Exchange. S’il ne s’affiche pas, suivez ces étapes :

  1. Assurez-vous d’utiliser Outlook 2010 ou une version plus récente.
  2. Vérifiez que votre compte est bien connecté à un serveur Microsoft Exchange.
  3. La fonctionnalité MailTips est configurée sur le serveur Exchange. Si l’avertissement ne s’affiche pas, demandez à votre administrateur informatique d’activer MailTips pour votre organisation.
Limitations
  • Cette fonctionnalité est exclusivement réservée aux comptes Outlook connectés à un serveur Exchange et n’est pas compatible avec les comptes de messagerie personnels (tels que Outlook.com, Gmail ou les comptes POP/IMAP).
  • Les utilisateurs finaux ne peuvent ni personnaliser ni activer ou désactiver directement cette fonctionnalité dans Outlook : elle est exclusivement gérée par l’administrateur informatique.

Utilisation d’un code VBA

Le code VBA suivant vous permet de recevoir un avertissement chaque fois que vous envoyez un e-mail à un domaine externe dans Outlook. Procédez comme suit.

1. Appuyez sur les touches Alt + F11 pour ouvrir la fenêtre Microsoft Visual Basic pour Applications.

2. Dans la fenêtre Microsoft Visual Basic pour Applications, double-cliquez sur ThisOutlookSession pour ouvrir la fenêtre ThisOutlookSession (Code), puis copiez le code VBA ci-dessous dans cette fenêtre. Voir la capture d’écran :

Code VBA : Avertissement lors de l’envoi d’un e-mail vers un domaine externe

Private Sub Application_ItemSend(ByVal Item As Object, Cancel As Boolean)
'Update by Extendoffice 20180504
Dim xMailItem As Outlook.MailItem
Dim xRecipients As Outlook.Recipients
Dim i As Long
Dim xRecipientAddress As String
Dim xPrompt As String
Dim xYesNo As Integer
Dim xPos As Integer
On Error Resume Next
If Item.Class <> olMail Then Exit Sub
Set xMailItem = Item
Set xRecipients = xMailItem.Recipients
For i = xRecipients.Count To 1 Step -1
    xRecipientAddress = xRecipients.Item(i).Address
    xPos = InStrRev(LCase(xRecipientAddress), "@addin99.com")
    If xPos <= 0 Then Exit For
    Cancel = False
Next
If InStrRev(LCase(xRecipientAddress), "@addin99.com") > 0 Then Exit Sub
xPrompt = "Are you sure to send this email to outside your company? "
xYesNo = MsgBox(xPrompt, vbYesNo + vbQuestion, "Kutools for Outlook")
If xYesNo = vbNo Then Cancel = True
End Sub

Remarque : Dans le code, « @addin99.com » correspond au domaine e-mail interne vers lequel vous envoyez des messages. Adaptez-le selon vos besoins.

doc-warning-when-sending-email-to-external-domain-1

Désormais, dès que vous cliquerez sur le bouton **Envoyer** pour transmettre des e-mails à des adresses externes au domaine e-mail (différentes du domaine interne défini dans votre code VBA), une boîte d’avertissement s’affichera, comme illustré dans la capture d’écran ci-dessous.

doc-warning-when-sending-email-to-external-domain-2

Assistant IA Mail dans Outlook : des réponses plus intelligentes, une communication plus claire (magie en un clic !) !

Simplifiez vos tâches quotidiennes dans Outlook avec l’Assistant IA Mail de Kutools pour Outlook. Cet outil intelligent s’appuie sur vos e-mails précédents pour vous suggérer des réponses pertinentes, optimiser le contenu de vos messages et vous aider à rédiger et perfectionner vos e-mails en toute simplicité.
doc ai email handle

Cette fonctionnalité prend en charge :

  • Réponses intelligentes : obtenez des réponses élaborées à partir de vos conversations passées – personnalisées, précises et immédiatement utilisables.
  • Contenu amélioré : affinez automatiquement le texte de vos e-mails pour plus de clarté et d’impact.
  • Rédaction simplifiée : il vous suffit d’indiquer des mots-clés, et l’IA s’occupe du reste, avec plusieurs styles d’écriture.
  • Extensions intelligentes : libérez tout le potentiel de vos idées grâce à des suggestions parfaitement adaptées à votre contexte.
  • Résumé : obtenez instantanément des aperçus concis de vos e-mails les plus longs.
  • Portée mondiale : traduisez vos e-mails facilement dans n’importe quelle langue.

Cette fonctionnalité prend en charge :

  • Réponses intelligentes aux e-mails
  • Contenu optimisé
  • Brouillons basés sur des mots-clés
  • Extension intelligente du contenu
  • Résumé d’e-mails
  • Traduction multilingue

N’attendez plus –téléchargez dès maintenant l’Assistant IA Mail et profitez-en!


Articles associés :

Meilleurs outils de productivité Office

🤖Kutools IA Aide: Révolutionnez Analyse des données grâce à :Exécution intelligente   |  Générez du code|  Créez formules personnalisées  |  Analysez des données et générez des graphiques|  Appelez Fonctions améliorées
Fonctionnalités populaires:Rechercher, mettre en surbrillance ou Marquer les doublons   |  Supprimer les lignes vides   |  Combinez les colonnes ou cellules sans perdre de données   |   Arrondi sans utiliser de formule...
Super RECHERCHEV:RechercheValeurs avec critères multiples  |  RechercheValeurs avec valeurs multiples  |   RechercheValeurs dans plusieurs feuilles   |   Correspondance floue....
Liste déroulante avancée:Créez rapidement une liste déroulante   |  Liste déroulante dépendante   |  Liste déroulante à sélection multiple....
Gestionnaire de colonnes:Ajoutez un nombre spécifique de colonnes|Déplacez des colonnes|Basculez l’état de visibilité des colonnes masquées|Comparez des plages et des colonnes...
Fonctionnalités phares:Mise au point de la grille   |  Vue de conception   |Barre de formule améliorée   | Gestionnaire de classeurs et feuilles   |  Bibliothèque de ressources(Texte automatique)|  Sélecteur de date   |  Consolider les feuilles de calcul  |  Chiffrez/Déchiffrer les cellules   | Envoyez des e-mails à partir d’une liste   |  Super Filtre   |   Filtre spécial(Filtrer les cellules avec une police en gras/italique/barré...) ...
Principaux jeux d’outils 15:12 Outilstexte(Ajouter du texte,Supprimer des caractères spécifiques, ...)|   50+Typesde graphiques(Diagramme de Gantt, ...)|   40+ Formules pratiques(Calculer l'âge en fonction de la date de naissance, ...)|   19 Outils d’insertion(Insérer un code QR,Insérer une image à partir d’un chemin, ...)|   12 Outils de conversion(Convertir en mots,Conversion de devises, ...)|   7 Outils Fusionner et scinder(Fusion avancée des lignes,Diviser les cellules, ...)|... et plus encore
Utilisez Kutools dans la langue de votre choix – disponible en anglais, espagnol, allemand, français, chinois et 40+ autres langues !

Boostez vos compétences Excel avec Kutools pour Excel et découvrez une efficacité inégalée.Kutools pour Excel propose plus de 300 fonctionnalités avancées pour accroître votre productivité et Gagner du temps.Cliquez ici pour obtenir la fonctionnalité dont vous avez le plus besoin...


Office Tab apporte une interface à onglets à Office et rend votre travail bien plus facile

  • Activez l’édition et la lecture par onglets dans Word, Excel, PowerPoint, Publisher, Access, Visio et Project.
  • Ouvrez et créez plusieurs documents dans de nouveaux onglets de la même fenêtre, au lieu de le faire dans des fenêtres séparées.
  • Augmente votre productivité de 50 % et vous fait économiser des centaines de clics de souris chaque jour !

Tous les compléments Kutools en un seul installateur.

Kutools for Office regroupe les compléments pour Excel, Word, Outlook et PowerPoint, ainsi qu’Office Tab Pro, ce qui en fait la solution idéale pour les équipes travaillant sur plusieurs applications Office.

ExcelWordOutlookTabsPowerPoint
  • Suite tout-en-un— compléments pour Excel, Word, Outlook et PowerPoint + Office Tab Pro
  • Un seul installateur, une seule licence— installation en quelques minutes (compatible MSI)
  • Fonctionne mieux ensemble— productivité optimisée entre les applications Office
  • Essai gratuit de 30 jours avec toutes les fonctionnalités— aucune inscription, aucune carte bancaire
  • Meilleur rapport qualité-prix— économisez par rapport à l’achat de compléments individuels