有人能告诉我我在这里做错了什么吗?它没有以它应该的方式拾取电子邮件(即自动将附件下载到文件夹中)。没有错误消息,也没有任何操作(我使用了F8,但没有注意到任何异常)。 Dim olApp As Outlook.Application Set olApp = Outlook.Application
Set objNS = olApp.GetNamesp
我有一个代码,得到一个ETA (估计到达时间),但我希望它排除周末。如果时间是下午2:30,我也可以改变ETA。 Dim ETA1 As Date = Date.Today.AddDays(1) Dim ETA3 As Date = Date.Today.AddDays(3)
Dim time As Date