通过

Outlook) (MailItem.Actions 属性

  • 项目

返回表示项的所有可用操作的 操作 集合。 此为只读属性。

语法

expression。 Actions

expression 表示 MailItem 对象的变量。

示例

此 Visual Basic for Applications (VBA) 示例创建一封新邮件，并使用 Actions.Add 方法将 操作 添加到它。 然后它将邮件项目发送给当前用户。 接收邮件项目将具有除了具有标准的动作，如 答复和 全部答复同意操作。

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 方法添加到该调用 原始链接操作 。 执行此操作将插入到原始邮件项目的链接。

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 支持和反馈，获取有关如何接收支持和提供反馈的指南。