Hoe ontvang je een e-mailmelding wanneer een ontvanger jouw Excel-bijlage opent?
Bij het verzenden van belangrijke informatie in een Excel-bestand als bijlage, kan het handig zijn om te weten of de ontvanger het bestand heeft geopend. Met VBA kun je een code maken die automatisch een e-mailmelding naar je stuurt zodra de ontvanger het werkboek opent. Deze handleiding laat je zien hoe je deze functionaliteit in Excel kunt instellen, zodat je bevestiging ontvangt wanneer het bijgevoegde bestand 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 wanneer je Outlook gebruikt als je e-mailprogramma.
Voordat je dit Excel-bestand verzendt, moet je een code maken zoals hieronder aangegeven:
1. Houd de toetsen ALT + F11 ingedrukt om het Microsoft Visual Basic for Applications-venster te openen.
2. Dubbelklik vervolgens op ThisWorkbook onder de sectie VBAProject om een lege module te openen, en kopieer en plak vervolgens de volgende code in de module:
VBA-code: Stuur 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: In de bovenstaande code moet je het e-mailadres wijzigen naar je eigen adres waar je de meldings-e-mail wilt ontvangen, en pas het onderwerp aan naar wens.
3. Sla dit werkboek vervolgens op als Excel Macro-Enabled Workbook-bestandstype, zie screenshot:
4. Stuur vervolgens een bericht met deze bijlage naar de ontvangers die je nodig hebt. Wanneer de ontvangers het Excel-bestand downloaden en openen en de code activeren, wordt er automatisch een meldings-e-mail naar je verzonden die je vertelt wie het bestand heeft geopend, zoals in de volgende schermafbeelding te zien is:
Beste productiviteitstools voor Office
Verbeter je Excel-vaardigheden met Kutools voor Excel en ervaar ongeëvenaarde efficiëntie. Kutools voor Excel biedt meer dan300 geavanceerde functies om je productiviteit te verhogen en tijd te besparen. Klik hier om de functie te kiezen die je het meest nodig hebt...
Office Tab brengt een tabbladinterface naar Office en maakt je werk veel eenvoudiger
- Activeer tabbladbewerking en -lezen in Word, Excel, PowerPoint, Publisher, Access, Visio en Project.
- Open en maak meerdere documenten in nieuwe tabbladen van hetzelfde venster, in plaats van in nieuwe vensters.
- Verhoog je productiviteit met50% en bespaar dagelijks honderden muisklikken!
Alle Kutools-invoegtoepassingen. Eén installatieprogramma
Kutools for Office-suite bundelt invoegtoepassingen voor Excel, Word, Outlook & PowerPoint plus Office Tab Pro, ideaal voor teams die werken met Office-toepassingen.
- Alles-in-één suite — invoegtoepassingen voor Excel, Word, Outlook & PowerPoint + Office Tab Pro
- Eén installatieprogramma, één licentie — in enkele minuten geïnstalleerd (MSI-ready)
- Werkt beter samen — gestroomlijnde productiviteit over meerdere Office-toepassingen
- 30 dagen volledige proef — geen registratie, geen creditcard nodig
- Beste prijs — bespaar ten opzichte van losse aanschaf van invoegtoepassingen