Метод Envelope.UpdateDocument (Word)

Статья
04/07/2023

Обновления конверт в документе с текущими параметрами конверта.

Синтаксис

выражение. UpdateDocument

выражение (обязательно). Переменная, представляющая объект "Конверт".

Замечания

Если вы используете это свойство до добавления конверта в документ, возникает ошибка.

Пример

В этом примере конверт форматирован в Report.doc, чтобы использовать пользовательский размер конверта (4,5 дюйма на 7,5 дюйма).

Sub UpdateEnvelope() 
 
 On Error GoTo errhandler 
 
 With Documents("Report.doc").Envelope 
 .DefaultHeight = InchesToPoints(4.5) 
 .DefaultWidth = InchesToPoints(7.5) 
 .UpdateDocument 
 End With 
 
 Exit Sub 
 
errhandler: 
 
 If Err = 5852 Then _ 
 MsgBox "Report.doc doesn't include an envelope" 
 
End Sub

В этом примере к активному документу добавляется конверт с использованием предопределенных адресов. Для параметров линейчатого кода конверта по умолчанию и лицового опознавательного знака (FIM-A) задано значение True, а конверт в активном документе обновляется.

Dim strAddress As String 
Dim strReturn As String 
 
strAddress = "Darlene Rudd" & vbCr & "1234 E. Main St." _ 
 & vbCr & "Our Town, WA 98004" 
strReturn = "Patricia Reed" & vbCr & "N. 33rd St." _ 
 & vbCr & "Other Town, WA 98040" 
ActiveDocument.Envelope.Insert _ 
 Address:=strAddress, ReturnAddress:=strReturn 
With ActiveDocument.Envelope 
 .DefaultPrintBarCode = True 
 .DefaultPrintFIMA = True 
 .UpdateDocument 
End With

См. также

Объект конверта

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

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

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