Cum să trimiteți un e-mail la o anumită oră a zilei în Excel?
În unele cazuri, poate fi necesar să întârziați trimiterea unui e-mail la un anumit moment din timpul lucrului. Știi cum să realizezi acest lucru? Acest articol vă va arăta o metodă de trimitere a unui e-mail la ora specifică a unei zile în Excel.
Trimiteți un e-mail la o anumită oră a zilei cu codul VBA
Trimiteți un e-mail la o anumită oră a zilei cu codul VBA
Următoarele coduri VBA vă pot ajuta să trimiteți un e-mail la ora specifică a zilei în Excel. Vă rugăm să faceți următoarele.
1. apasă pe Alt + F11 tastele pentru a deschide Microsoft Visual Basic pentru aplicații fereastră.
2. În Microsoft Visual Basic pentru aplicații fereastră, faceți clic pe Insera > Module. Apoi copiați mai jos codul VBA în fereastra Module.
Cod VBA 1: trimiteți un e-mail la o anumită oră a zilei în 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 Sub3. Faceți dublu clic pe ThisWorkbook în panoul din stânga pentru a deschide fereastra ThisWorkbook (Code). Și apoi copiați mai jos codul VBA 2 în fereastră. Vedeți captura de ecran:
Cod VBA 2: trimiteți un e-mail la o anumită oră a zilei în Excel
Private Sub Workbook_Open()
'Updated by Extendoffice 2018/3/5
Application.OnTime TimeValue("11:00:00"), "SendEmail"
End Subnotițe: În codul 2, vă rugăm să specificați timpul de trimitere după cum aveți nevoie.
4. apasă pe Alt + Q tastele pentru a închide Microsoft Visual Basic pentru aplicații fereastră.
5. clic Fișier > Salvare ca > Naviga.
6. În Salvare ca caseta de dialog, vă rugăm să alegeți un folder pentru a salva registrul de lucru, denumiți-l după cum aveți nevoie, selectați Cartea de lucru Excel Macro-Enabled format din Salvați ca tip lista derulantă și apoi faceți clic pe Economisiți buton. Vedeți captura de ecran:
De acum înainte, imediat după sosirea orei specifice, anumite e-mailuri se vor afișa automat. Vă rugăm să faceți clic pe Trimiteți pentru a trimite acest e-mail.
Legate de articole:
- Cum să trimiteți automat e-mailuri pe baza valorii celulei din Excel?
- Cum se introduce semnătura în e-mailul Outlook când se trimite prin vba în Excel?
- Cum să trimiteți e-mailuri cu corp de e-mail HTML în Excel?
- Cum să trimiteți un e-mail cu formatul de text specificat în bold / dimensiune / culoare / subliniat în Excel?
- Cum să trimiteți e-mail fără Outlook în Excel?
- Cum să trimiteți o anumită diagramă într-un e-mail cu vba în Excel?
Cele mai bune instrumente de productivitate de birou
Îmbunătățiți-vă abilitățile Excel cu Kutools pentru Excel și experimentați eficiența ca niciodată. Kutools pentru Excel oferă peste 300 de funcții avansate pentru a crește productivitatea și a economisi timp. Faceți clic aici pentru a obține funcția de care aveți cea mai mare nevoie...
Fila Office aduce interfața cu file în Office și vă face munca mult mai ușoară
- Activați editarea și citirea cu file în Word, Excel, PowerPoint, Publisher, Access, Visio și Project.
- Deschideți și creați mai multe documente în filele noi ale aceleiași ferestre, mai degrabă decât în ferestrele noi.
- Vă crește productivitatea cu 50% și reduce sute de clicuri de mouse pentru dvs. în fiecare zi!
