相关疑难解决方法(0)

Thread.Sleep()在Access VBA中是否有相同的功能？

我在Win XP上运行Outlook 2003.我的桌面警报已打开并且运行顺畅.

但最近我创建了一个VBA宏,将传入的电子邮件分类到几个不同的文件夹中(通过ThisOutlookSession中的item_add事件).这以某种方式阻止桌面警报显示.

有没有办法手动从VBA代码调用桌面警报？也许某种功能.

PS:我无法通过规则对电子邮件进行排序,这不是一种选择

基本上我正在用RegEx查看电子邮件中的6位数代码

我的代码(对不起,这是我在互联网上找到的其他代码片段的拼凑

Option Explicit

Private WithEvents olInboxItems As Items

Private Sub Application_Startup()
Dim objNS As NameSpace
Set objNS = Application.Session
Set olInboxItems = objNS.GetDefaultFolder(olFolderInbox).Items
Set objNS = Nothing
End Sub

Private Sub olInboxItems_ItemAdd(ByVal Item As Object)
On Error Resume Next

Dim targetFolder As Outlook.MAPIFolder
Dim myName As String

Dim Reg1 As RegExp
Dim M1 As MatchCollection
Dim M As Match

Set Reg1 = New RegExp
myName = "[MyName]"

' \s* = invisible spaces
' …