Hoe ontvangt u een e-mailmelding zodra een ontvanger uw Excel-bijlage opent?
Wanneer u belangrijke informatie deelt via een Excel-bijlage, is het handig om te weten of de ontvanger het bestand daadwerkelijk heeft geopend. Met VBA kunt u eenvoudig een code instellen die automatisch een e-mailmelding naar u verzendt zodra de werkmap wordt geopend. In deze handleiding leest u hoe u deze functionaliteit in Excel configureert, zodat u direct bevestiging ontvangt telkens wanneer de bijgevoegde file wordt geopend.
Activeer een e-mailmelding wanneer een Excel-bijlage wordt geopend met behulp van VBA-code
Activeer een e-mailmelding wanneer een Excel-bijlage wordt geopend met behulp van VBA-code
Opmerking: Deze methode is alleen beschikbaar als u Outlook gebruikt als uw e-mailprogramma.
Voordat u dit Excel-bestand verzendt, moet u de volgende code maken:
1. Houd de ALT + F11-toetsen ingedrukt om het venster Microsoft Visual Basic for Applications te openen.
2. Dubbelklik vervolgens op ThisWorkbook onder het gedeelte VBAProject om een lege module te openen en plak de volgende code in deze module:
VBA-code: Verzend een e-mail wanneer het Excel-bestand wordt geopend:
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
Opmerking: Vervang in de bovenstaande code E-mailadres door uw eigen adres waarop u de meldingsmail wilt ontvangen, en pas het onderwerp naar wens aan.
3. Sla deze werkmap vervolgens op als Excel-werkmap met macro's ingeschakeld bestandstype, zie schermafbeelding:
4. Verzend daarna een bericht met deze bijlage naar de ontvangers van wie u dit nodig hebt. Zodra de ontvangers het Excel-bestand downloaden, openen en de code activeren, ontvangt u automatisch een meldingsmail met daarin vermeld wie het bestand heeft geopend, zoals in de volgende schermafbeelding wordt weergegeven:
Beste Office-productiviteitshulpmiddelen
Geef uw Excel-vaardigheden een boost met Kutools voor Excel en ervaar efficiëntie zoals nooit tevoren.Kutools voor Excel biedt meer dan 300 geavanceerde functies om de productiviteit te verhogen en Tijd besparen.Klik hier om de functie te krijgen die u het meest nodig heeft...
Office Tab brengt een tabbladinterface naar Office en maakt uw werk veel eenvoudiger
- Schakel tabbladbewerking en -lezen in voor Word, Excel, PowerPoint, Publisher, Access, Visio en Project.
- Open en maak meerdere documenten aan in nieuwe tabbladen binnen hetzelfde venster, in plaats van in afzonderlijke vensters.
- Verhoogt uw productiviteit met 50 % en bespaart u dagelijks honderden muisklikken!
Alle Kutools-add-ins in één installatieprogramma.
Kutools for Office bundelt add-ins voor Excel, Word, Outlook en PowerPoint, plus Office Tab Pro—ideaal voor teams die met meerdere Office-apps werken.
- Alles-in-één suite— add-ins voor Excel, Word, Outlook & PowerPoint plus Office Tab Pro
- Één installatieprogramma, één licentie— binnen enkele minuten klaar (MSI-geschikt)
- Werkt beter samen— gestroomlijnde productiviteit in alle Office-apps
- 30 dagen volledig functionele proefversie— geen registratie, geen creditcard
- Beste prijs-kwaliteitverhouding— bespaar ten opzichte van het afzonderlijk kopen van add-ins