Skip to main content

Como contar os membros de uma lista de distribuição no Outlook?

Author: Siluvia Last Modified: 2025-06-04

Gerenciar grupos de contatos no Outlook pode ser desafiador às vezes, especialmente quando você precisa saber o número de membros em uma lista de distribuição. O Outlook não oferece um recurso embutido para isso, deixando muitos usuários sem saber como obter rapidamente uma contagem precisa. Neste artigo, exploraremos dois métodos para resolver esse problema: usar VBA para uma solução manual e o método muito mais simples e rápido do Kutools para Outlook. Se você está procurando facilidade de uso e eficiência, o segundo método realmente se destacará.

Contar Membros da Lista de Distribuição Usando Código VBA (Manual e Trabalhoso)

Conte Membros do Grupo de Contatos Instantaneamente com Kutools para Outlook 👍 (Rápido e Sem Esforço)


Contar Membros da Lista de Distribuição Usando Código VBA

Para usuários confortáveis com configurações técnicas, o "VBA" (Visual Basic for Applications) oferece uma maneira de contar membros em uma lista de distribuição. Embora eficaz, este método requer algum esforço para configurar e executar.

Passo 1: Criar e salvar código VBA

1. Pressione "Alt" + "F11" para abrir a janela Microsoft Visual Basic for Applications.

2. Clique em "Inserir" > "Módulo" na barra de ferramentas.

the screenshot of step about counting distribution list members in Outlook with VBA code 1

3. Em seguida, copie e cole o seguinte código VBA na janela "VbaProject".

VBA: Contar membros da lista de distribuição no Outlook

Sub CountDLMembers()
    Dim oOL As Outlook.Application
    Dim oSelection As Outlook.Selection
    Dim oItem As Object
    Dim olDL As Outlook.DistListItem
    Dim Result As String
    Set oOL = Outlook.Application
    'Check and get the selected Contact Group
    Select Case TypeName(oOL.ActiveWindow)
        Case "Explorer"
            Set oSelection = oOL.ActiveExplorer.Selection
            If oSelection.Count > 0 Then
                Set oItem = oSelection.Item(1)
            Else
                Result = MsgBox("No item selected. " & _
                            "Please select a Contact Group first.", _
                            vbCritical, "CountDLMembers")
                Exit Sub
            End If
        Case "Inspector"
            Set oItem = oOL.ActiveInspector.CurrentItem
        Case Else
            Result = MsgBox("Unsupported Window type." & _
                        vbNewLine & "Please make a selection " & _
                        "in the Calendar or open a Contact Group first.", _
                        vbCritical, "CountDLMembers")
            Exit Sub
    End Select
    If oItem.Class = Outlook.olDistributionList Then
        'Display the member count
        Set olDL = oItem
        Result = MsgBox("The Contact Group '" & olDL.DLName & "' contains " & olDL.MemberCount & " members.", vbInformation, "CountDLMembers")
    Else
        'Selected item isn't a Contact Group item
        Result = MsgBox("No Contact Group item selected. " & _
                    "Please make a selection first.", _
                    vbCritical, "CountDLMembers")
        Exit Sub
    End If
    'Cleanup
    Set oOL = Nothing
    Set olDL = Nothing
End Sub

4. Clique no ícone "Salvar", depois feche o editor VBA.

Passo 2: Adicionar um botão para a macro na Barra de Acesso Rápido

1. Navegue até "Pessoas" ou "Contatos" no painel de navegação do Outlook para alternar para a "Visualização de Contatos/Pessoas".

2. Clique com o botão direito na "Barra de Acesso Rápido" e clique em "Personalizar Barra de Acesso Rápido" no menu de contexto.

the screenshot of step about counting distribution list members in Outlook with VBA code 2

3. Na caixa de diálogo "Opções do Outlook", você precisa:

  • 1). Selecionar "Macros" na lista suspensa "Escolher comandos de".
  • 2). Selecione a macro que você criou na lista e clique em "Adicionar", depois clique em "OK".

the screenshot of step about counting distribution list members in Outlook with VBA code 3

Passo 3: Executar o código VBA

Após adicionar o botão para a macro na "Barra de Acesso Rápido", agora você pode executar o código VBA para contar os membros da lista de distribuição.

1. Selecione a lista de distribuição que deseja analisar e clique no botão da macro na "Barra de Acesso Rápido".

the screenshot of step about counting distribution list members in Outlook with VBA code 4

2. Um prompt exibirá o número de membros na lista de distribuição.

the screenshot of step about counting distribution list members in Outlook with VBA code 5


🌟 Divida Grupos de Contatos Facilmente no Outlook 🌟

🚀 Reorganize rapidamente seus grupos de contatos no Outlook! Com o Kutools para Outlook, você pode dividir grandes grupos em outros menores e mais gerenciáveis em poucos cliques.

✨ Como Funciona:

  1. Alterne para a visualização de Contatos e selecione o grupo que deseja dividir.
  2. Clique em "Kutools Plus" > "Grupo de Contatos" > "Dividir em um novo grupo de contatos".
  3. Selecione os contatos que deseja mover para um novo grupo e nomeie o grupo.
  4. Clique em "OK" e deixe o Kutools cuidar do resto!
Split to Multiple Contact Groups Feature

🌟 Experimente o Kutools para Outlook Agora


Conte Membros do Grupo de Contatos Instantaneamente com Kutools para Outlook 👍

Se você está procurando uma solução mais rápida, fácil e intuitiva, o "Kutools para Outlook" é a ferramenta perfeita. Seu recurso "Informação" fornece uma contagem instantânea dos membros da lista de distribuição com apenas um clique. Este método elimina a necessidade de configurações técnicas e oferece detalhes adicionais sobre o grupo, tornando-o indispensável para usuários do Outlook.

Desbloqueie a máxima eficiência de e-mail com o Kutools para Outlook! Acesse 70 recursos poderosos totalmente grátis, para sempre. Faça o download da Versão Gratuita Agora!

1. Após abrir o grupo de contatos que deseja analisar, clique em "Kutools" > "Informação".

the screenshot of step about counting distribution list members in Outlook with Kutools method 6

2. Instantaneamente, você poderá ver o "número total de membros", "data de criação" e "data da última modificação".

the screenshot of step about counting distribution list members in Outlook with Kutools method 7

Por que o Método Kutools é Superior?

Embora a abordagem VBA seja funcional, ela é impraticável para a maioria dos usuários devido à sua complexidade e configuração de várias etapas. Por outro lado, o Kutools para Outlook oferece conveniência incomparável. Aqui está o porquê de ser a melhor escolha:

  • Configuração Rápida: Não há necessidade de navegar pelos menus ou escrever código. Instale o Kutools e você estará pronto para começar.
  • Solução de Um Clique: Economize tempo e esforço com resultados instantâneos.
  • Sem Erros: Ao contrário do VBA, não há risco de erros de codificação ou configuração. O Kutools garante 100% de precisão toda vez.
  • Informações Abrangentes: Vá além da simples contagem de membros com dados adicionais que o VBA não pode fornecer.
  • Produtividade Profissional: Ideal para usuários que precisam gerenciar grupos de contatos de forma eficiente sem interrupções.
Nota: Para aplicar o utilitário "Informação" do Kutools para Outlook, primeiro você deve baixar e instalar o Kutools para Outlook.

Melhores Ferramentas de Produtividade para Office

Notícia de Última Hora: Kutools para Outlook Lança Versão Gratuita!

Experimente agora a nova versão GRATUITA do Kutools para Outlook, com mais de70 recursos incríveis para você usar PARA SEMPRE! Clique para baixar agora!

🤖 Kutools AI : Utiliza tecnologia avançada de IA para gerenciar emails com facilidade, incluindo responder, resumir, otimizar, expandir, traduzir e redigir emails.

📧 Automação de Email: Resposta automática (Disponível para POP e IMAP) / Agendar envio de emails / CC/BCC automático por Regra ao enviar email / Encaminhamento automático (Regra avançada) / Adicionar saudação automaticamente / Dividir automaticamente emails com múltiplos destinatários em mensagens individuais...

📨 Gerenciamento de Email: Recallar Email / Bloquear emails suspeitos por assunto e outros critérios / Excluir Emails Duplicados / Pesquisa Avançada / Organizar Pastas...

📁 Anexos Pro: Salvar em lote / Desanexar em lote / Comprimir em lote / Salvar automaticamente / Desanexar automaticamente / Auto Comprimir...

🌟 Interface Mágica: 😊Mais emojis bonitos e estilosos / Aviso quando emails importantes chegarem / Minimizar Outlook ao invés de fechar...

👍 Recursos com Um Clique: Responder a Todos com Anexos / Emails Anti-Phishing / 🕘Exibir o fuso horário do remetente...

👩🏼‍🤝‍👩🏻 Contatos & Calendário: Adicionar contatos em lote a partir de emails selecionados / Dividir um grupo de contatos em grupos individuais / Remover lembrete de aniversário...

Desbloqueie instantaneamente o Kutools para Outlook com um único clique. Não perca tempo, baixe agora e aumente sua produtividade!

kutools for outlook features1 kutools for outlook features2