在Outlook 2013中，宏可以打開一個新的自定義窗體嗎？

Question

在Outlook 2013中使用開發工具選項卡 - >設計表單，我從傳遞的消息形式創建一個自定義窗體（無MODS還），並把它放在我的個人窗體庫。展望告訴我，郵件類是：IPM.Note.MyForm

我創建了一個宏，併成立了一個新的功能區按鈕來運行宏。我希望宏打開我的自定義窗體的新實例，但我無法使其工作。

用下面的代碼，我可以得到宏觀打開傳遞郵件窗體的新實例：

Set newItem = Application.CreateItem(olMailItem) 
newItem.Display 
Set newItem = Nothing 

我不能讓它打開我的自定義窗體。我已經嘗試了以下作爲CreateItem的參數：olMailItem.MyForm和IPM.Note.MyForm。

宏編輯器智能感知具有參數CreateItem約9個選項，所有的人似乎要傳遞的對象/形式，它的錯誤如果不使用這些選項之一。

我已經做了很少的VBA和Office宏，有沒有辦法讓這個宏開我的自定義窗體？謝謝。

Answer 1

見Items.Add http://msdn.microsoft.com/en-us/library/office/ff861028(v=office.15).aspx

Sub AddForm() 
Dim myNamespace As outlook.NameSpace 
Dim myItems As outlook.Items 
Dim myFolder As outlook.Folder 
Dim myItem As outlook.MailItem 

Set myNamespace = Application.GetNamespace("MAPI") 
Set myFolder = myNamespace.GetDefaultFolder(olFolderInbox) 
Set myItems = myFolder.Items 
Set myItem = myItems.Add("IPM.Note.MyForm") 
End Sub