Astuce: Les autres langues sont Google-Traduction. Vous pouvez visiter le English version de ce lien.
Se connecter
x
or
x
x
S'enregistrer
x

or

Outlook: rappel automatique lors de l'oubli des pièces jointes dans les messages

Vous risquez d'avoir mal à la tête d'oublier d'ajouter des pièces jointes, mais rappelez aux destinataires de vérifier les pièces jointes dans le corps du message. Ici, nous allons présenter deux astuces sur la façon de vous rappeler automatiquement lorsque vous envoyez un message électronique qui peut être des pièces jointes manquantes dans Microsoft Outlook.

Rappel automatique en cas d'oubli de pièces jointes dans Outlook 2013 / 2016

Rappel automatique en cas d'oubli de pièces jointes dans Outlook 2007 et 2010

supprimer tous les contacts en double d'un ou plusieurs dossiers de contacts dans Outlook

Dans certains cas, nous pouvons ajouter à plusieurs reprises les mêmes contacts, comment peut-on supprimer les contacts en double d'un ou plusieurs dossiers de contacts? Kutools for Outlook's Duplicate Contacts fonction peut rapidement supprimer ou fusionner des contacts en double basés sur des courriels, le nom complet ou d'autres critères d'un ou plusieurs dossiers de contacts. Cliquez pour l'essai gratuit de 45 days!
doc supprimer les contacts en double 1
Kutools pour Outlook: avec des dizaines de compléments Outlook pratiques, gratuits à essayer sans limitation dans les jours 45.
Onglet Office - Activer l'édition et la navigation par onglets dans Office, et simplifier considérablement le travail ...
Kutools for Outlook - apporte de puissantes fonctionnalités avancées 100 à Microsoft Outlook
  • CC automatique / BCC par les règles lors de l'envoi d'email; Transfert automatique Emails multiples par règles; Réponse automatique sans serveur d'échange, et plus de fonctionnalités automatiques ...
  • Avertissement BCC - afficher le message lorsque vous essayez de répondre à tous si votre adresse de messagerie est dans la liste BCC; Rappeler lorsque des pièces jointes sont manquantes, et plus encore, rappelle les fonctionnalités ...
  • Répondre (tous) avec toutes les pièces jointes dans la conversation par courrier; Répondez plusieurs courriels à la fois; Ajout automatique de message d'accueil quand répondez; Ajout automatique Date et heure dans le sujet ...
  • Outils de fixation: Détacher automatiquement, tout compresser, tout renommer, tout enregistrer automatiquement ... Rapport rapide, Compter les messages sélectionnés, Supprimer les e-mails et les contacts en double ...
  • Plus que les fonctionnalités avancées de 100 résoudre la plupart de vos problèmes dans Outlook 2010-2019 et 365. Fonctionnalités complètes Essai gratuit du jour 60.

flèche bleue droite bulleRappel automatique en cas d'oubli des pièces jointes dans Outlook 2013 / 2016

Microsoft Outlook 2013 prend en charge la fonctionnalité de vous avertir automatiquement lorsque vous envoyez un message électronique qui peut contenir des pièces jointes.

Étape 1: cliquez sur le Fichier > Options.

Étape 2: dans la boîte de dialogue Options Outlook, cliquez sur le Courrier dans la barre de gauche.

Étape 3: Aller à la Envoyer des messages section, et continuez à vérifier l'option de M'avertir quand j'envoie un message qui pourrait manquer une pièce jointe.

Étape 4: cliquez sur le OK pour quitter cette boîte de dialogue.

Ensuite, Microsoft Outlook 2013 ou 2016 vous avertira automatiquement si vous risquez d'oublier les pièces jointes.

Par exemple, vous entrez le texte de "veuillez vérifier les pièces jointes","voir les pièces jointes", Etc. dans votre corps de message, mais n'insérez pas de pièces jointes dans le Attachement champ. En cliquant sur le Envoyer bouton, une boîte de dialogue d'avertissement apparaîtra pour indiquer que vous avez peut-être oublié de joindre un fichier. Voir la capture d'écran suivante:


flèche bleue droite bulleRappel automatique en cas d'oubli de pièces jointes dans Outlook 2007 et 2010

Microsoft Outlook 2007 et 2010 ne prennent pas en charge automatiquement l'avertissement si vous risquez d'oublier les pièces jointes. Une macro VBA peut vous aider à le réaliser.

Étape 1: appuyez sur le autre + F11 clés pour ouvrir la fenêtre Microsoft Visual pour Applications.

Étape 2: Déplacez le projet 1 dans la barre de gauche et double-cliquez sur le ThisOutlookSession pour l'ouvrir.

Étape 3: collez le code suivant dans la fenêtre ThisOutlookSession.

VBA: Attention sinon insérer la pièce jointe

Private Sub Application_ItemSend(ByVal Item As Object, Cancel As Boolean)
Dim retMB As Variant
Dim strBody As String
Dim iIndex As Long

On Error GoTo handleError

iIndex = InStr(Item.Body, "attach")

If iIndex > 0 And Item.Attachments.Count = 0 Then

retMB = MsgBox("You may have forgotten to attach a file." & vbCrLf & vbCrLf & "Do you still want to continue?", vbQuestion + vbYesNo + vbMsgBoxSetForeground)
If retMB = vbNo Then Cancel = True

End If

handleError:

If Err.Number <> 0 Then
MsgBox "Outlook Attachment Alert Error: " & Err.Description, vbExclamation, "Outlook Attachment Alertr Error"
End If

End Sub

Étape 4: cliquez sur le Épargnez bouton sur la barre d'outils.

A partir de maintenant, si vous ajoutez un texte de "attachement"Dans le corps du message, mais ne pas joindre les fichiers, le rappel d'avertissement apparaîtra pour vous dire que vous avez peut-être oublié de joindre un fichier lorsque vous cliquez sur le Envoyer bouton. Voir la capture d'écran:


Kutools for Outlook - Apporte les fonctionnalités avancées de 100 à Outlook et simplifie grandement le travail!

  • CC automatique / BCC par les règles lors de l'envoi d'email; Transfert automatique Emails multiples par coutume; Réponse automatique sans serveur d'échange, et plus de fonctionnalités automatiques ...
  • Avertissement BCC - afficher le message lorsque vous essayez de répondre à tous si votre adresse mail est dans la liste BCC; Rappeler lorsque des pièces jointes sont manquantes, et plus encore, rappelle les fonctionnalités ...
  • Répondre (tous) avec toutes les pièces jointes dans la conversation par courrier; Répondre à beaucoup d'emails en secondes; Ajout automatique de message d'accueil quand répondez; Ajouter la date au sujet ...
  • Outils de pièce jointe: Gérer toutes les pièces jointes dans tous les courriers, Auto Detach, Compresser tout, Renommer tout, Sauvegarder tout ... Rapport rapide, Compter les mails sélectionnés...
  • Puissants courriers indésirables par la coutume; Supprimer les e-mails et les contacts en double... Vous permet de faire plus intelligemment, plus rapidement et mieux dans Outlook.
tir kutools perspectives onglet kutools 1180x121
tir kutools perspectives kutools plus onglet 1180x121
Say something here...
symbols left.
You are guest ( Sign Up? )
or post as a guest, but your post won't be published automatically.
Loading comment... The comment will be refreshed after 00:00.
  • To post as a guest, your comment is unpublished.
    ben · 5 months ago
    The built in functionality is not as good as the VBA code !!! Test it for yourself, for example, if you copy/paste the "please check attachments" text, it won't trigger... you need to write it in the body. I prefer the VBA code version, and moreover you can customize it (language and check for other words).
  • To post as a guest, your comment is unpublished.
    lee · 1 years ago
    works well- easy to set up-thanks
  • To post as a guest, your comment is unpublished.
    LMS · 1 years ago
    Will not work for me regardless of count value. I've tried everything here and for some reason can never get the popup.
  • To post as a guest, your comment is unpublished.
    RJL · 1 years ago
    THANK YOU!
    This works perfectly for me with "If iIndex > 0 And Item.Attachments.Count = 0" despite the fact that I have an image in my signature. I'm using Microsoft Office Professional Plus 2010
  • To post as a guest, your comment is unpublished.
    Jill · 2 years ago
    If anyone is having trouble using this code, images in your signature count as attachments.


    I have one image in my signature, so changing the line:

    If iIndex > 0 And Item.Attachments.Count = 0 Then

    to:

    If iIndex > 0 And Item.Attachments.Count = 0 Or Item.Attachments.Count = 1 Then

    Made it work for me.
    • To post as a guest, your comment is unpublished.
      Anthony · 2 years ago
      Thanks for pointing this out this was also a problem I was having. I found that your fix prompted the warning regardless of whether the word 'attach' had been used. Instead I used:

      If iIndex > 0 And Item.Attachments.Count = 1 Then

      This prompted the warning only when intended not whenever any email was sent.
  • To post as a guest, your comment is unpublished.
    Stacy · 2 years ago
    This Code would not work for me. I had to use this one:
    Private Sub Application_ItemSend(ByVal Item As Object, Cancel As Boolean)

    If InStr(1, Item.Body, "attach", vbTextCompare) > 0 Then

    If Item.Attachments.Count = 0 Then

    answer = MsgBox("There's no attachment, send anyway?", vbYesNo)

    If answer = vbNo Then Cancel = True

    End If

    End If

    End Sub
  • To post as a guest, your comment is unpublished.
    Norma · 2 years ago
    Is the Auto-Attachment feature designed to work when email is sent using the Ctrl+Enter keys?
  • To post as a guest, your comment is unpublished.
    Norma · 2 years ago
    Is the Auto Attachment feature designed to work when you send email using the Ctrl+Enter keys?
  • To post as a guest, your comment is unpublished.
    Holly · 2 years ago
    I've used this code and when I test it with my email address in the to line I get the error message, but if I put anyone else in there it goes through just fine. Any ideas about what could be happening?
  • To post as a guest, your comment is unpublished.
    George · 2 years ago
    How to set Warning when a message is sent without attachment in lotus notes 8.5.3 ?
  • To post as a guest, your comment is unpublished.
    Pierre · 2 years ago
    Has anyone got this to work in Outlook 2010? I've followed the above instructions and it doesn't do anything
  • To post as a guest, your comment is unpublished.
    Pierre · 2 years ago
    Has anyone got this to work? I've added this code per the instructions above, enabled macros, but nothing. The code doesn't do anything.
  • To post as a guest, your comment is unpublished.
    Natasha · 2 years ago
    Hi I have used this and its working great but I noticed that if someone responds to me and then I reply it searches the whole trail of emails rather than just the one being sent. Is there a way to change this?

    Thanks
  • To post as a guest, your comment is unpublished.
    Echo · 2 years ago
    Great help! :lol: it helps a lot! many thanks!
    • To post as a guest, your comment is unpublished.
      DAN · 2 years ago
      Here's everything, sorry it looks like some of it got cut off in the previous message...

      Private Sub Application_ItemSend(ByVal Item As Object, Cancel As Boolean)
      Dim retMB As Variant
      Dim strBody, strEnd, strTrunc, strAttach, strFtype, strIndex As String
      Dim iIndex, i, trueCount As Long

      On Error GoTo handleError
      i = 1
      strEnd = InStr(Item.Body, "From:")

      If strEnd 0 Then
      strTrunc = Left(Item.Body, strEnd)
      Else:
      strTrunc = Item.Body
      End If
      'Debug.Print strTrunc

      If Item.Attachments.Count 0 Then
      iIndex = Item.Attachments.Count
      trueCount = Item.Attachments.Count
      'Debug.Print iIndex
      'Debug.Print trueCount
      Do While i
      • To post as a guest, your comment is unpublished.
        Jeremy · 2 years ago
        Hi Dan! Looks like your second post cut off at the same place. Not sure if there's a character limit in the forum...maybe try splitting the code between posts?
  • To post as a guest, your comment is unpublished.
    DAN · 2 years ago
    First off, thanks. I Incorporated this into our office that runs on 2010. However, we found that if someone had sent an email initially with the word attached and after multiple replies the macro would still count the initial "attach". Big problem with long email convo's you would keep being prompted to put an attachment due to the original email. Thoughts?
    • To post as a guest, your comment is unpublished.
      DAN · 2 years ago
      [quote name="DAN"]First off, thanks. I Incorporated this into our office that runs on 2010. However, we found that if someone had sent an email initially with the word attached and after multiple replies the macro would still count the initial "attach". Big problem with long email convo's you would keep being prompted to put an attachment due to the original email. Thoughts?[/quote]


      Thought I'd share a solution we came up with in my office on this one. This will make it so that pictures added to the email or that may be found in someone's signature will not count as an attachment. And it only takes a count of your most recent email, not the whole body.

      Private Sub Application_ItemSend(ByVal Item As Object, Cancel As Boolean)
      Dim retMB As Variant
      Dim strBody, strEnd, strTrunc, strAttach, strFtype, strIndex As String
      Dim iIndex, i, trueCount As Long

      On Error GoTo handleError
      i = 1
      strEnd = InStr(Item.Body, "From:")

      If strEnd 0 Then
      strTrunc = Left(Item.Body, strEnd)
      Else:
      strTrunc = Item.Body
      End If
      'Debug.Print strTrunc

      If Item.Attachments.Count 0 Then
      iIndex = Item.Attachments.Count
      trueCount = Item.Attachments.Count
      'Debug.Print iIndex
      'Debug.Print trueCount
      Do While i
      • To post as a guest, your comment is unpublished.
        Michael Marcotte · 2 years ago
        I know this thread is a couple months old, so I'm hoping you are still following. For some reason, I'm unable to see your comment in its entirety. It is getting cut off at "Do While i". Is there any way you can repost or send via email?

        Thanks in advance!
  • To post as a guest, your comment is unpublished.
    Alex · 2 years ago
    Is it possible to look for more than one word? F.e. checking for both "attach" and "enclosed"

    Thank you
    • To post as a guest, your comment is unpublished.
      Chelsea Williams · 2 years ago
      in this section of the code...

      iIndex = InStr(Item.Body, "attach")

      you can add in more variables or "strings".

      Ex: iIndex = InStr(Item.Body, "attach", "attachment", "attaching")

      ... and so on. Make sure you separate each one with a comma however
  • To post as a guest, your comment is unpublished.
    TLC · 2 years ago
    For some of you noting that nothing happened... I couldn't get it to work right away, but when I started my computer up the next day it worked fine. Maybe a restart is required?
  • To post as a guest, your comment is unpublished.
    TLC · 2 years ago
    This macro works for me, but unfortunately the company-required signature has a confidentiality notice that contains the work "attach" 3 times! So I get the pop up warning with every email I sign. How can I edit the macro to only warn we if the word attach is in the email 4 or more times?
    • To post as a guest, your comment is unpublished.
      Paul VanPraag · 2 years ago
      In the line which states "If iIndex > 0 And Item.Attachments.count = 0 Then" change the first 0 to a 3 so it reads:
      "If iIndex > 3 And Item.Attachments.count = 0 Then"

      That line is checking for how many times you said the word specified in the previous line, so I think that will fix your problem.
  • To post as a guest, your comment is unpublished.
    Devon · 3 years ago
    I have macros enabled in Outlook 2010, but the code is not working. All files with attachment in the body are still sending with no attachment.
  • To post as a guest, your comment is unpublished.
    Irina · 3 years ago
    I tried the macro and nothing happens - any ideea why?
  • To post as a guest, your comment is unpublished.
    amit · 3 years ago
    Really, It's working.

    thanks
  • To post as a guest, your comment is unpublished.
    urvil · 5 years ago
    hi,
    gr8 help,thanks.

    but there is an issue when the date changes macro do not works, any help for life time. ;-)