Método Application.AddAddress (Word)

Adiciona uma entrada ao catálogo de endereços. Cada entrada tem valores para uma ou mais IDs de marca.

Sintaxe

expressão. AddAddress (TagID, Value)

expressão Obrigatório. Uma variável que representa um objeto Application.

Parâmetros

Nome Obrigatório/Opcional Tipo de dados Descrição
TagID Obrigatório Matriz de string Os valores de identificação de marcação para a nova entrada de endereço. Cada elemento na matriz pode conter uma das cadeias de caracteres listadas na tabela a seguir. Somente o nome para exibição é necessário; as entradas restantes são opcionais.
Valor Obrigatório Matriz de string Os valores para a nova entrada de endereço. Cada elemento corresponde a um elemento na matriz TagID. Para obter mais informações, confira o exemplo.

IDs de marca

ID de marca Descrição
PR_DISPLAY_NAME Nome exibido na caixa de diálogo Catálogo de endereços
PR_DISPLAY_NAME_PREFIX Título (por exemplo, "Sra." ou "Dr.")
PR_GIVEN_NAME Nome
PR_SURNAME Sobrenome
PR_STREET_ADDRESS Endereço
PR_LOCALITY Cidade ou logradouro
PR_STATE_OR_PROVINCE Estado ou distrito
PR_POSTAL_CODE CEP
PR_COUNTRY País/região
PR_TITLE Cargo
PR_COMPANY_NAME Nome da empresa
PR_DEPARTMENT_NAME Nome de departamento dentro da empresa
PR_OFFICE_LOCATION Local do escritório
PR_PRIMARY_TELEPHONE_NUMBER Número de telefone principal
PR_PRIMARY_FAX_NUMBER Número de fax principal
PR_OFFICE_TELEPHONE_NUMBER Número de telefone do escritório
PR_OFFICE2_TELEPHONE_NUMBER Segundo número de telefone do escritório
PR_HOME_TELEPHONE_NUMBER Número de telefone residencial
PR_CELLULAR_TELEPHONE_NUMBER Número de telefone celular
PR_BEEPER_TELEPHONE_NUMBER Número de telefone do pager
PR_COMMENT Texto incluído na guia Observações da entrada de endereço
PR_EMAIL_ADDRESS Endereço de email
PR_ADDRTYPE Tipo de endereço de email
PR_OTHER_TELEPHONE_NUMBER Outro número de telefone (além do residencial ou do escritório)
PR_BUSINESS_FAX_NUMBER Número de fax comercial
PR_HOME_FAX_NUMBER Número de fax residencial
PR_RADIO_TELEPHONE_NUMBER Número de radiotelefone
PR_INITIALS Iniciais
PR_LOCATION Local, no formato númerodoedifício/númerodasala (por exemplo, 7/3007 representando sala 3007 no edifício 7)
PR_CAR_TELEPHONE_NUMBER Número de telefone do automóvel

Exemplo

Este exemplo adiciona uma entrada ao catálogo de endereços.

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()

Confira também

Suporte e comentários

Tem dúvidas ou quer enviar comentários sobre o VBA para Office ou sobre esta documentação? Confira Suporte e comentários sobre o VBA para Office a fim de obter orientação sobre as maneiras pelas quais você pode receber suporte e fornecer comentários.