共用方式為

Actions.Add 方法 (Outlook)

  • 發行項

在 Actions 集合 中建立新的動作。

語法

運算式。添加

表達 代表 Actions 物件的變數。

傳回值

代表新動作的 Action 物件。

範例

此 VBA 範例會建立新的郵件訊息，並使用 Add 方法將 Action 新增至其中。 為了讓本範例執行無誤，請以有效的收件者名稱取代 'Dan Wilson'。

Sub AddAction() 
 
 Dim myItem As Outlook.MailItem 
 
 Dim myAction As Outlook.Action 
 
 
 
 Set myItem = Application.CreateItem(olMailItem) 
 
 Set myAction = myItem.Actions.Add 
 
 myAction.Name = "Link Original" 
 
 myAction.ShowOn = olMenuAndToolbar 
 
 myAction.ReplyStyle = olLinkOriginalItem 
 
 myItem.To = "Dan Wilson" 
 
 myItem.Send 
 
End Sub

另請參閱

Actions 物件

支援和意見反應

有關於 Office VBA 或這份文件的問題或意見反應嗎？ 如需取得支援服務並提供意見反應的相關指導，請參閱 Office VBA 支援與意見反應。