我现在正在处理Outlook宏,以便将选定的文件夹添加到Outlook的收藏夹组。我尝试过使用这种方法
Sub AddToFavorites()
Dim olapp As Outlook.Application
Dim objFolder As Outlook.MAPIFolder
Set olapp = New Outlook.Application
Set objFolder = olapp.ActiveExplorer.CurrentFolder
objFolder.AddToPFFavorites
End Sub
但是AddToPFFavorites方法抛出错误“