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

Comment envoyer un rappel ou une notification par courrier électronique si le classeur est mis à jour dans Excel?

Dans certains cas, vous devrez peut-être déclencher une notification par courrier électronique à un destinataire spécifié s'il existe des données mises à jour dans le classeur que vous avez envoyé. Cet article vous montrera la méthode pour y parvenir.

Envoyer un rappel ou une notification par courrier électronique si le classeur est mis à jour avec le code VBA


Envoyer un rappel ou une notification par courrier électronique si le classeur est mis à jour avec le code VBA


Veuillez faire comme suit pour envoyer un rappel ou une notification par courrier électronique si le classeur est mis à jour.

1. Dans le classeur, ouvrez une feuille de calcul spécifiée, vous enverrez une notification par courrier électronique basée sur les données mises à jour à l'intérieur.

2. Cliquez avec le bouton droit sur l'onglet de la feuille et sélectionnez Voir le code dans le menu contextuel. Voir la capture d'écran:

2. dans le Microsoft Visual Basic pour applications fenêtre, copiez et collez le code suivant dans la fenêtre de code. Voir la capture d'écran:

Code VBA: Envoyer un rappel ou une notification par e-mail si le classeur est mis à jour

Private Sub Worksheet_Change(ByVal Target As Range)
'Updated by Extendoffice 2017/9/14
    Dim xOutApp As Object
    Dim xMailItem As Object
    Dim xName As String
    Dim xYesOrNo As Integer
    On Error Resume Next
    Set xOutApp = CreateObject("Outlook.Application")
    Set xMailItem = xOutApp.CreateItem(0)
    xYesOrNo = MsgBox("Want to attach updated workbook in email?", vbInformation + vbYesNo, "KuTools For Excel")
    If xYesOrNo = 6 Then ActiveWorkbook.Save
    If xYesOrNo = 6 Then xName = ActiveWorkbook.FullName
    With xMailItem
        .To = "Email Address"
        .cc = ""
        .Subject = "email notification test"
        .Body = "Hi," & Chr(13) & Chr(13) & "File is now updated."
        If xYesOrNo = 6 Then .Attachments.Add xName
        .Display
    End With
    xMailItem = Nothing
    xOutApp = Nothing
End Sub

Note: Remplacer l'adresse e-mail avec l'adresse e-mail du destinataire en ligne .To = "Adresse e-mail". Et changez le Cc, le sujet ainsi que les champs de corps dans le code de VBA comme vous avez besoin.

3. appuie sur le autre + Q les clés pour fermer le Microsoft Visual Basic pour applications fenêtre.

4. Après avoir modifié une cellule dans la feuille de calcul, un Kutools for Excel La boîte de dialogue apparaîtra comme ci-dessous. Si vous souhaitez joindre le classeur mis à jour dans l'e-mail, cliquez sur le Oui bouton. Sinon, cliquez sur le Non .

5. Ensuite, un e-mail est créé automatiquement avec ou sans le classeur mis à jour joint. Et tous les champs spécifiés sont également répertoriés dans l'e-mail. S'il vous plaît cliquer sur le Envoyer bouton pour l'envoyer.

Note: Le code VBA ne fonctionne que lorsque vous utilisez Outlook en tant que votre programme de messagerie.


Articles Liés:



Outils de productivité recommandés

Office Tab

étoile d'or1 Apportez des onglets pratiques à Excel et à d'autres logiciels Office, tout comme Chrome, Firefox et Internet Explorer.

Kutools for Excel

étoile d'or1 Incroyable! Augmentez votre productivité dans les minutes 5. Ne nécessite pas de compétences particulières, économisez deux heures par jour!

étoile d'or1 300 Nouvelles fonctionnalités pour Excel, rendent Excel facile et puissant:

  • Fusionner des cellules / lignes / colonnes sans perdre de données.
  • Combiner et consolider plusieurs feuilles et classeurs.
  • Comparez les gammes, copiez plusieurs gammes, convertissez le texte en date, l'unité et la conversion de devise.
  • Compter par couleurs, sous-totaux de recherche, tri avancé et super filtre,
  • Plus Sélectionner / Insérer / Supprimer / Texte / Format / Lier / Commenter / Classeurs / Feuilles de calcul Outils ...

Capture d'écran de Kutools pour Excel

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.