Comment envoyer un email lorsque le fichier Excel de la pièce jointe est ouvert par les destinataires?
La plupart d'entre nous peuvent envoyer des messages importants avec une pièce jointe Excel à nos clients, nous devons donc savoir si le destinataire a reçu le message et a ouvert la pièce jointe. Dans ce cas, vous pouvez créer un code VBA pour votre fichier de pièce jointe Excel, lorsque le destinataire ouvre le classeur et active le code, un e-mail d'invite vous sera envoyé automatiquement.
Envoyer un e-mail lorsque le fichier Excel de la pièce jointe est ouvert par les destinataires avec le code VBA
Avant d'envoyer ce fichier Excel, vous devez créer un code comme suit:
1. Maintenez le ALT + F11 clés pour ouvrir le Microsoft Visual Basic pour applications fenêtre.
2. Puis double-cliquez Ce classeur sous le VBAProjet section pour ouvrir un module vide, puis copiez et collez le code suivant dans le module:
Code VBA: envoyez un e-mail à l'ouverture du fichier Excel:
Private Sub Workbook_Open()
'Updateby Extendoffice
Dim olkObj As Object
Dim olkEm As Object
Dim strbody As String
Set olkObj = CreateObject("Outlook.Application")
Set olkEm = olkObj.CreateItem(0)
strbody = "Hi there" & vbNewLine & vbNewLine & _
ThisWorkbook.Name & vbNewLine & _
"was opened by" & vbNewLine & _
Environ("username")
On Error Resume Next
With olkEm
.To = ""
.CC = ""
.BCC = ""
.Subject = "File opened"
.Body = strbody
.Send
End With
On Error GoTo 0
Set olkEm = Nothing
Set olkObj = Nothing
End Sub
Notes: Dans le code ci-dessus, vous devez changer l'adresse e-mail en votre propre adresse à laquelle vous souhaitez recevoir l'e-mail d'invite, et changer le sujet selon vos besoins.
3. Enregistrez ensuite ce classeur sous Cahier de travail Excel avec macro-activé format de fichier, voir capture d'écran:
4. Et puis envoyez un message avec cette pièce jointe aux destinataires dont vous avez besoin, lorsque les destinataires téléchargent et ouvrent ce fichier Excel et activent le code, un e-mail d'invite vous sera automatiquement envoyé et vous indique que le fichier a été ouvert par qui comme suit capture d'écran montrée:
Notes: Cette méthode n'est disponible que lorsque vous utilisez Outlook comme programme de messagerie.
Meilleurs outils de productivité bureautique
Améliorez vos compétences Excel avec Kutools for Excel et faites l'expérience d'une efficacité comme jamais auparavant. Kutools for Excel offre plus de 300 fonctionnalités avancées pour augmenter la 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 facilite grandement votre travail
- Activer 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, plutôt que dans de nouvelles fenêtres.
- Augmente votre productivité de 50% et réduit des centaines de clics de souris chaque jour!
