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.