Метод MailItem.Forward (Outlook)

Статья
04/07/2023

Выполняет действие Пересылка для элемента и возвращает результирующая копия в виде объекта MailItem .

Синтаксис

выражение. Forward

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

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

Объект MailItem , представляющий новый почтовый элемент.

Пример

В этом примере Visual Basic для приложений (VBA) метод Remove используется для удаления всех вложений из пересылаемого сообщения перед его отправкой Дэну Уилсону. Чтобы запустить этот пример, замените "Dan Wilson" допустимым именем получателя и сохраните почтовый элемент, содержащий по крайней мере одно вложение, открытым в активном окне.

Sub RemoveAttachmentBeforeForwarding() 
 
 Dim myinspector As Outlook.Inspector 
 
 Dim myItem As Outlook.MailItem 
 
 Dim myattachments As Outlook.Attachments 
 
 
 
 Set myinspector = Application.ActiveInspector 
 
 If Not TypeName(myinspector) = "Nothing" Then 
 
 Set myItem = myinspector.CurrentItem.Forward 
 
 Set myattachments = myItem.Attachments 
 
 While myattachments.Count > 0 
 
 myattachments.Remove 1 
 
 Wend 
 
 myItem.Display 
 
 myItem.Recipients.Add "Dan Wilson" 
 
 myItem.Send 
 
 Else 
 
 MsgBox "There is no active inspector." 
 
 End If 
 
End Sub

См. также

Объект MailItem

Поддержка и обратная связь

Есть вопросы или отзывы, касающиеся Office VBA или этой статьи? Руководство по другим способам получения поддержки и отправки отзывов см. в статье Поддержка Office VBA и обратная связь.

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