Вход


Главная страница >> Учебный процесс >> Конспекты >> MS Office. Руководство программиста по Visual Basic для MS Office 97 >> Объекты Microsoft Word >> Работа с другими объектами общего назначения >> Объекты MailMerge и Envelope

Переход на главную страницу

Сервер поддерживается
кафедрой информатики и вычислительной техники ГрГУ
тел. +375-(0)152-445-101
E-mail :
kadan@grsu.grodno.by


[Назад]    [Содержание ]    [Вперед]

  


Объекты MailMerge и Envelope


Свойство MailMerge объекта Document позволяет получить объект MailMerge, который доступен в любом документе, а не только в документе слияния (mail-merge document). Перед самим слиянием (методом Execute) определите через свойство State текущее состояние операции слияния. В следующем примере слияние осуществляется, если активный документ является основным документом с присоединенным источником данных:

Set myMerge = ActiveDocument.MailMerge
If myMerge.State = wdMainAndDataSource Then mуМеrge.Execute

Cвойство Envelope объекта Document позволяет получить объект Envelope, доступный, даже, если конверт к данному документу не добавлен. В последнем случае неизбежна ошибка при обращении к любому из следующих свойств: Address, AddressFromLeft, AddressFromTop, FeedSource, ReturnAddress, 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"



[Назад]    [Содержание ]    [Вперед]

  



Текст пособия подготовлен на основе материалов книги
Microsoft Corporation. Руководство программиста по Visual Basic для Microsoft Office 97 / Пер. с англ. - М.: Издательский отдел "Русская Редакция" ТОО "Channel Trading Ltd.", 1997. - 544 с.: илл.
c Оригинальное издание на английском языке,
Microsoft Corporation, 1997
c Русский перевод,
Microsoft Corporation, 1997

  
За содержание страницы отвечает Гончарова М.Н.
©
Кафедра СПиКБ, 2002-2017