我想每周运行一次,以便通过电子邮件收到提醒。
Sub Outlookmail()
If Range("C12") >= 0 Then
Dim outobj, mailobj
Dim strFileText
Dim objFileToRead
Set outobj = CreateObject("Outlook.Application")
Set mailobj = outobj.CreateItem(0)
With mailobj
.To = "myemail@blabla"
.Subject = "BETALA BETALA"
.Body = "DIN BUDGET SPRICKER KOMPIS"
.send
End With
'Clear the memory
Set outobj = Nothing
Set mailobj = Nothing
End If
End Sub
我是编码新手。这是我可以和Google一起思考的最好的方法。
此程序正在运行时,是否可以导出日历提醒?既然这是我的预算文件,是否还可以更新日期?如果可以,怎么办?