Метод Application.AddAddress (Word)

Добавляет запись в адресную книгу. Каждая запись содержит значения для одного или нескольких идентификаторов тегов.

Синтаксис

expression. AddAddress (TagID, Value)

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

Параметры

Имя Обязательный или необязательный Тип данных Описание
TagID Обязательный Массив строк Значения идентификатора тега для новой записи адреса. Каждый элемент в массиве может содержать одну из строк, перечисленных в следующей таблице. Требуется только отображаемое имя; остальные записи являются необязательными.
Значение Обязательный Массив строк Значения для новой записи адреса. Каждый элемент соответствует элементу в массиве TagID. Дополнительные сведения см. в примере.

Идентификаторы тегов

Идентификатор тега Описание
PR_DISPLAY_NAME Имя, отображаемое в диалоговом окне Адресная книга
PR_DISPLAY_NAME_PREFIX Заголовок (например, "Ms." или "Dr.")
PR_GIVEN_NAME Имя
PR_SURNAME Фамилия
PR_STREET_ADDRESS Адрес (улица, дом)
PR_LOCALITY Город или населенный пункт
PR_STATE_OR_PROVINCE Область, край;
PR_POSTAL_CODE Почтовый индекс
PR_COUNTRY Страна или регион
PR_TITLE Должность
PR_COMPANY_NAME Имя компании
PR_DEPARTMENT_NAME Название отдела в компании
PR_OFFICE_LOCATION Расположение Office
PR_PRIMARY_TELEPHONE_NUMBER Основной номер телефона
PR_PRIMARY_FAX_NUMBER Основной номер факса
PR_OFFICE_TELEPHONE_NUMBER Номер телефона офиса
PR_OFFICE2_TELEPHONE_NUMBER Второй номер телефона офиса
PR_HOME_TELEPHONE_NUMBER Номер домашнего телефона
PR_CELLULAR_TELEPHONE_NUMBER Номер сотового телефона
PR_BEEPER_TELEPHONE_NUMBER Номер телефона Beeper
PR_COMMENT Текст, включенный на вкладку "Заметки " для записи адреса
PR_EMAIL_ADDRESS Адрес электронной почты
PR_ADDRTYPE Тип адреса электронной почты
PR_OTHER_TELEPHONE_NUMBER Альтернативный номер телефона (кроме дома или офиса)
PR_BUSINESS_FAX_NUMBER Номер бизнес-факса
PR_HOME_FAX_NUMBER Домашний номер факса
PR_RADIO_TELEPHONE_NUMBER Номер радиотелефона
PR_INITIALS Initials
PR_LOCATION Расположение в формате buildingnumber/roomnumber (например, 7/3007 представляет комнату 3007 в здании 7)
PR_CAR_TELEPHONE_NUMBER Номер телефона автомобиля

Пример

В этом примере в адресную книгу добавляется запись.

Dim tagIDArray(0 To 3) As String 
Dim valueArray(0 To 3) As String 
 
tagIDArray(0) = "PR_DISPLAY_NAME" 
tagIDArray(1) = "PR_GIVEN_NAME" 
tagIDArray(2) = "PR_SURNAME" 
tagIDArray(3) = "PR_COMMENT" 
valueArray(0) = "Kim Buhler" 
valueArray(1) = "Kim" 
valueArray(2) = "Buhler" 
valueArray(3) = "This is a comment" 
 
Application.AddAddress TagID:=tagIDArray(), Value:=valueArray()

См. также

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

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