Объект конверта (Word)
Представляет конверт, прикрепленный к документу.
Используйте свойство Envelope , чтобы вернуть объект Envelope . В следующем примере добавляется конверт в новый документ и устанавливается расстояние между верхней частью конверта и адресом в 2,25 дюйма.
Set myDoc = Documents.Add
addr = "Michael Matey" & vbCr & "123 Skye St." _
& vbCr & "Redmond, WA 98107"
retaddr = "Cora Edmonds" & vbCr & "456 Erde Lane" & vbCr _
& "Redmond, WA 98107"
With myDoc.Envelope
.Insert Address:=addr, ReturnAddress:=retaddr
.AddressFromTop = InchesToPoints(2.25)
End With
Замечания
Объект Конверт доступен независимо от того, был ли добавлен конверт в указанный документ. Однако если вы используете одно из следующих свойств, если конверт не был добавлен в документ: Address, AddressFromLeft, AddressFromTop, FeedSource, ReturnAddress, ReturnAddressFromLeft, ReturnAddressFromLeft, ReturnAddressFromTop и UpdateDocument.
В следующем примере показано, как использовать инструкцию On Error GoTo для перехвата ошибки, возникающей, если конверт не был добавлен в активный документ. Однако если в документ добавлен конверт, отображается адрес получателя.
On Error GoTo ErrorHandler
MsgBox ActiveDocument.Envelope.Address
ErrorHandler:
If Err = 5852 Then MsgBox _
"Envelope is not in the specified document"
Используйте метод Insert , чтобы добавить конверт в указанный документ. Используйте метод PrintOut , чтобы задать свойства конверта и распечатать его без добавления в документ.
Примечание
Коллекция конвертов отсутствует; каждый объект Document содержит только один объект Envelope .
Справочник по объектной модели Word
Есть вопросы или отзывы, касающиеся Office VBA или этой статьи? Руководство по другим способам получения поддержки и отправки отзывов см. в статье Поддержка Office VBA и обратная связь.