共用方式為

Outlook) (MailItem.Actions 屬性

  • 發行項

會傳回代表專案所有可用動作的 Actions 集合。 唯讀。

語法

expression。 Actions

表達 代表 MailItem 物件的 變數。

範例

這個 Visual Basic for Applications (VBA) 範例會建立新的訊息項目，並使用 Actions.Add 方法將 Action 新增至其中。 接著，它會將郵件項目傳送給目前的使用者。 收到的郵件項目除了具有 [回覆] 和 [全部回覆] 等標準動作之外，還會具有 [同意] 動作。

Sub AddAction() 
 
 Dim myItem As Outlook.MailItem 
 
 Dim myAction As Outlook.Action 
 
 
 
 Set myItem = Application.CreateItem(olMailItem) 
 
 Set myAction = myItem.Actions.Add 
 
 myAction.Name = "Agree" 
 
 myItem.To = Application.GetNamespace("MAPI").CurrentUser 
 
 myItem.Send 
 
End Sub

下列 Visual Basic for Applications 範例會建立新的訊息項目，並使用Actions.Add方法將名為Link Original的Action新增至其中。 執行此動作會將連結插入原始郵件項目中。

Sub AddAction2() 
 
 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

另請參閱

MailItem 物件

支援和意見反應

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