Поделиться через

Метод Actions.Add (Outlook)

  • Статья

Создает новое действие в коллекции Actions .

Синтаксис

expression. Добавить

Выражение Переменная, представляющая объект Actions .

Возвращаемое значение

Объект Action , представляющий новое действие.

Пример

В этом примере VBA создается новое почтовое сообщение и используется метод Add для добавления к нему действия . Чтобы выполнить этот пример без ошибок, замените "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 и обратная связь.