过滤OutLook-2010中的约会,会议和在线会议项目

时间:2013-05-02 08:30:22

标签: vba outlook-vba

我想在VBA中编写一个宏,它将为我提供上述类别中的所有项目。 我可以找到所有的AppointItems。我怎样才能找到其他人? 有什么想法吗?

设置objExpCal = objNS.GetDefaultFolder(olFolderCalendar).GetExplorer

设置objNavMod = objExpCal.NavigationPane.Modules.GetNavigationModule(olModuleCalendar)

设置objNavGroup = objNavMod.NavigationGroups.GetDefaultNavigationGroup(olPeopleFoldersGroup)

对于objNavGroup.NavigationFolders中的每个objNavFolder

设置objFolder = objNavFolder.Folder

设置oItems = objFolder.Items

对于每个MyItem in oItems

如果(MyItem.Start> = dateintxtbox1和MyItem.Start< = dateintxtbox2)那么

'写在excelsheet代码

结束如果

1 个答案:

答案 0 :(得分:0)

MeetingItem是OlAppointmentItem的特定子类型。对于给定的AppointmentItem,如果对象的MeetingStatus属性为true,则它是会议,并将在收件箱中接收。

请参阅:MSDN MeetingItem InterfaceMSDN _AppointmentItem.MeetingStatus Property

如果是您正在寻找的IPM消息类 - 这是一个列表:list of message classes

我不知道什么是“在线会议”项目 - 我认为这与正常会议不同。也许只是会议内容中有某种类型的livemeeting链接?

希望这有帮助。