Hur skickar jag ett e-postmeddelande vid en specifik tid på dagen i Excel?
I vissa fall kan du behöva skjuta upp ett e-postmeddelande vid en viss tidpunkt under ditt arbete. Vet du hur man uppnår detta? Den här artikeln kommer att visa dig en metod för att skicka ett e-postmeddelande vid den specifika tiden på dagen i Excel.
Skicka ett mejl vid en viss tid på dygnet med VBA-kod
Skicka ett mejl vid en viss tid på dygnet med VBA-kod
Följande VBA-koder kan hjälpa dig att skicka ett e-postmeddelande vid den specifika tiden på dagen i Excel. Gör så här.
1. tryck på andra + F11 nycklar för att öppna Microsoft Visual Basic för applikationer fönster.
2. I Microsoft Visual Basic för applikationer fönstret klickar Insert > Modulerna. Kopiera sedan VBA-koden nedan till modulfönstret.
VBA-kod 1: Skicka ett e-postmeddelande vid en specifik tid på dagen i Excel
Sub SendEmail()
'Updated by Extendoffice 2018/3/5
Set olApp = CreateObject("Outlook.application")
Set objMail = olApp.CreateItem(olMailItem)
With objMail
.Display
.To = "Email address"
.Subject = "Send email"
'HTML for fun
'.BodyFormat = olFormatHTML
.HTMLBody = "<HTML><H2>Email Body</BODY></HTML>"
'.Send
End With
End Sub
3. Dubbelklicka på ThisWorkbook i den vänstra rutan för att öppna ThisWorkbook (Code) -fönstret. Och kopiera sedan under VBA-kod 2 till fönstret. Se skärmdump:
VBA-kod 2: Skicka ett e-postmeddelande vid en specifik tid på dagen i Excel
Private Sub Workbook_Open()
'Updated by Extendoffice 2018/3/5
Application.OnTime TimeValue("11:00:00"), "SendEmail"
End Sub
Anmärkningar: I kod 2, ange sändningstiden efter behov.
4. tryck på andra + Q för att stänga Microsoft Visual Basic för applikationer fönster.
5. klick Fil > Spara som > Bläddra.
6. I Spara som dialogrutan, välj en mapp för att spara arbetsboken, namnge den efter behov, välj Excel Macro-Enabled Workbook format från Spara som rullgardinsmenyn och slutligen klicka på Save knapp. Se skärmdump:
Från och med nu, så snart den specifika tiden anländer, visas det specifika e-postmeddelandet automatiskt. Klicka på Skicka knappen för att skicka detta e-postmeddelande.
Relaterade artiklar:
- Hur skickar man automatiskt e-post baserat på cellvärde i Excel?
- Hur infogar jag signatur i Outlook-e-post när du skickar med vba i Excel?
- Hur skickar jag e-post med HTML-e-post i Excel?
- Hur skickar jag e-post med angivet fetstil / storlek / färg / understruket textformat i Excel?
- Hur skickar jag e-post utan Outlook i Excel?
- Hur skickar jag ett specifikt diagram i ett e-postmeddelande med vba i Excel?
Bästa kontorsproduktivitetsverktyg
Uppgradera dina Excel-färdigheter med Kutools för Excel och upplev effektivitet som aldrig förr. Kutools för Excel erbjuder över 300 avancerade funktioner för att öka produktiviteten och spara tid. Klicka här för att få den funktion du behöver mest...
Fliken Office ger ett flikgränssnitt till Office och gör ditt arbete mycket enklare
- Aktivera flikredigering och läsning i Word, Excel, PowerPoint, Publisher, Access, Visio och Project.
- Öppna och skapa flera dokument i nya flikar i samma fönster, snarare än i nya fönster.
- Ökar din produktivitet med 50 % och minskar hundratals musklick för dig varje dag!