No artigo de hoje, apresentaremos 2 métodos rápidos e eficazes para contar o número de marcadores em seu documento do Word.
De tempos em tempos, usávamos listas numeradas ou com marcadores em nossos documentos para organizar os itens. Geralmente, um marcador ou um número lidera um item individual, seja uma palavra, uma frase ou uma frase. Agora, se você tiver uma lista numerada, não será um problema descobrir o número total de itens. No entanto, e se houver listas com marcadores em seu documento do Word? Simplesmente contá-los um por um não soa bem.
Portanto, caso alguns de vocês precisem resumir o número do marcador, aqui estão 2 maneiras de resolver.
Método 1: converter uma lista com marcadores em uma lista numerada
- Em primeiro lugar, selecione a lista que você deseja obter o número do marcador.

- Em seguida, clique em “Numeração” no grupo “Parágrafo” na guia “Página inicial”. A lista com marcadores deve mudar para uma numerada.

Ou você também pode clicar com o botão direito do mouse na seleção e mover o cursor sobre a opção “Numeração” e, em seguida, passar o cursor sobre um dos estilos de numeração no menu estendido. Isso permite que você obtenha o número de marcadores sem realmente converter a lista com marcadores em uma numerada.
A propósito, se você precisar contar os marcadores de todo o documento, basta colocar o cursor em uma lista de marcadores e seguir as etapas acima. Você descobrirá que todas as listas com marcadores dentro do arquivo foram convertidas em listas numeradas com números em sequência, como abaixo:
Método 2: Usar Macro
- Para começar, se você deseja obter os marcadores de uma lista específica, selecione-a. Caso contrário, para a contagem dos marcadores em todo o documento, você deve pressionar “Ctrl+A” para tê-lo na seleção.
- Em seguida, clique na guia “Desenvolvedor”.
- Em seguida, clique em “Visual Basic” para abrir o editor VBA. A combinação de atalho é “Alt+ F11”.
- Agora clique em “Normal” e depois em “Inserir”.
- Escolha “Módulo” a seguir.
- Clique duas vezes no novo módulo e cole estes códigos na área de edição:
Sub GetNumberOfBullets()
Dim objRange As Range
Dim objParagraph As Paragraph
Dim nNumber As Integer
' Initialization
Set objRange = Selection.Range
nNumber = 0
For Each objParagraph In objRange.Paragraphs
If objParagraph.Range.ListFormat.ListType = WdListType.wdListBullet Then
nNumber = nNumber + 1
End If
Next objParagraph
' Pop up a message box to show the total number of bullets.
MsgBox ("Bullet number:" & nNumber)
End Sub
- Por fim, clique em “Executar”.
Você verá uma caixa de mensagem aparecendo, mostrando o resultado.
Gerencie bem seu arquivo
Lidamos com um grande número de documentos do Word durante a experiência de trabalho, sugerimos que devemos manuseá-los com cuidado, pois qualquer contratempo pode levar à corrupção. E caso ocorra algum dano ao arquivo, você precisará de um Ferramenta de recuperação de documentos do Word para ajudá-lo a resolver o problema.
Introdução do autor:
Vera Chen é especialista em recuperação de dados em DataNumen, Inc., líder mundial em tecnologias de recuperação de dados, incluindo ferramenta de reparo de danos de dados xls e pdf reparar produtos de software. Para mais informações visite www.datanumen.com





