O Outlook mostrará todos os e-mails de contato em seu formato de nome de exibição padrão, ou seja, “nome completo (endereço de e-mail)”. Se você não gostar, precisará alterá-lo manualmente sempre que criar novos contatos. Este artigo ensinará uma maneira rápida de alterá-los em lotes com o Outlook VBA.
Quando você cria um novo contato do Outlook, depois de inserir o nome completo e o endereço de e-mail e clicar na caixa “Exibir como”, o nome de exibição padrão será preenchido automaticamente, conforme a captura de tela a seguir:
Este nome de exibição de e-mail terá efeitos quando você precisar selecionar um contato. Como na imagem abaixo, os 2nd coluna “Nome de exibição” corresponde à informação no campo “Exibir como”.
Quando você quiser alterar o formato do nome de exibição do e-mail, deverá alterá-lo manualmente. Mas com a ajuda do VBA, você pode alterar o formato de nome de exibição de e-mail de todos os contatos para o formato desejado em lotes.
Alterar os formatos de nome de exibição de e-mail de todos os seus contatos em lotes
- Em primeiro lugar, inicie o Outlook e pressione os botões “Alt + F11” para acessar a janela “Visual Basic”.
- Em seguida, abra um novo módulo e copie os seguintes códigos VBA para ele.
Sub BatchChangeContactDisplayName() Dim obApp As Application Dim olContacts As Outlook.Items Dim obj As Object Dim oContact As Outlook.ContactItem Dim strName As String Set olContacts = Session.GetDefaultFolder(olFolderContacts).Items For Each obj In olContacts If TypeName(obj) = "ContactItem" Em seguida, defina oContact = obj Com oContact 'Mostrar formato do nome: "nome completo (nome da empresa) (endereço de e-mail)" strName = .FullName & " (" & .CompanyName & ")" & " (" & .Email1Address & " ) " .Email1DisplayName = strName .Salvar End With End If Next End Sub
Dicas Extra:
- Você pode alterar a ordem entre “nome completo”, “nome da empresa” e “endereço de e-mail” conforme sua preferência.
- O ".Nome completo” refere-se ao formato em “Firstname Lastname”. Se você quiser mostrar em “Sobrenome Nome”, use “.SobrenomeEPrimeiroNome" em vez de.
- Posteriormente, após colar os códigos VBA, deverá adicionar a nova macro à Barra de Ferramentas de Acesso Rápido. Siga os passos abaixo:
- Em primeiro lugar, volte para a janela principal do Outlook e pressione a seta para baixo na Barra de Ferramentas de Acesso Rápido.
- Na lista suspensa, escolha “Mais comandos”.
- Em seguida, na janela “Opções do Outlook”, você deve selecionar “Macros” na caixa “Escolher comandos de”.
- Em seguida, pise no tarobtenha a macro e pressione o botão "Adicionar" no centro.
- Por fim, clique no botão "OK".
- Eventualmente, você pode retornar à sua pasta de contatos padrão. Clique no botão macro na barra de ferramentas de acesso rápido. Depois disso, você pode abrir um contato para verificar. Você descobrirá que o formato do nome de exibição do e-mail foi alterado.
Fuja da perda de dados do Outlook
Como todos sabemos, o Outlook é suscetível a erros, corrupções. Portanto, é uma tarefa árdua manter os dados do Outlook protegidos e evitar a perda de dados. Portanto, você deve fazer um backup regular dos dados do Outlook, o que contribuirá muito para Recuperação de danos aos dados do Outlook no caso de falha do Outlook. Além disso, é essencial obter uma ferramenta de reparo potente, como DataNumen Outlook Repair. Em suma, será útil se o backup não estiver atualizado ou não produzir efeitos.
Introdução do autor:
Shirley Zhang é especialista em recuperação de dados em DataNumen, Inc., líder mundial em tecnologias de recuperação de dados, incluindo reparar SQL Server dano de banco de dados mdf e produtos de software de reparo do Outlook. Para mais informações visite www.datanumen.com