Como somar / contar números em negrito em um intervalo de células no Excel?
Se você tem um intervalo de dados contendo números em negrito em uma planilha e deseja somar ou contar apenas as células em negrito, poderia adicioná-los manualmente, mas isso seria demorado. Como você pode somar ou contar rapidamente apenas as células em negrito no Excel?
Conte números em negrito em um intervalo com Função Definida pelo Usuário (VBA e fórmula)
Some números em negrito em um intervalo com Função Definida pelo Usuário (VBA e fórmula)
Vários cliques para contar e somar células em negrito em um intervalo com Kutools para Excel
Conte números em negrito em um intervalo com Função Definida pelo Usuário
A seguinte Função Definida pelo Usuário pode ajudá-lo a obter rapidamente o número de células em negrito. Por favor, faça o seguinte:
1. Mantenha pressionadas as teclas ALT + F11, e abrirá a janela Microsoft Visual Basic for Applications.
2. Clique em Inserir > Módulo, e cole o seguinte código na Janela do Módulo.
Código VBA: Contar números em negrito em um intervalo de células
Function CountBold(WorkRng As Range)
'Update 20220516
Dim Rng As Range
Dim xCount As Double
For Each Rng In WorkRng
If Rng.Font.Bold Then
xCount = xCount + 1
End If
Next
CountBold = xCount
End Function
3. Em seguida, salve este código e digite esta fórmula =CountBold(A1:C9) em uma célula em branco, veja a captura de tela:
4. Em seguida, pressione a tecla Enter, e você contará as células em negrito no intervalo A1:C9.
Observação: A1:C9 na fórmula indica o intervalo que você deseja usar a função para contar as células em negrito, você pode alterá-lo conforme necessário.
Some números em negrito em um intervalo com Função Definida pelo Usuário
Se você quiser somar apenas os números em negrito em um intervalo de dados, pode criar uma função definida pelo usuário para alcançar isso.
1. Mantenha pressionadas as teclas ALT + F11, e abrirá a janela Microsoft Visual Basic for Applications.
2. Clique em Inserir > Módulo, e cole o seguinte código na Janela do Módulo.
Código VBA: Somar números em negrito em um intervalo de células
Function SumBold(WorkRng As Range)
'Update 20220516
Dim Rng As Range
Dim xSum As Double
For Each Rng In WorkRng
If Rng.Font.Bold Then
xSum = xSum + Rng.Value
End If
Next
SumBold = xSum
End Function
3. Em seguida, salve este código e digite esta fórmula =sumbold(A1:C9) em uma célula em branco, veja a captura de tela:
4. E então pressione a tecla Enter, todos os números em negrito no intervalo A1:C9 terão sido somados. Veja a captura de tela:
Observação: A1:C9 na fórmula indica o intervalo que você deseja usar a função para somar as células em negrito, você pode alterá-lo conforme necessário.
Vários cliques para contar e somar células em negrito em um intervalo com Kutools para Excel
Você pode facilmente contar ou somar todas as células em negrito em um intervalo com vários cliques sem lidar com códigos VBA complicados e lembrar fórmulas.
1. Para contar células em negrito, selecione uma célula em branco para localizar o resultado e clique em Kutools > Funções Aprimoradas > Contagem & Matemática > COUNTBYFONTBOLD.
E para somar células em negrito, clique em Kutools > Funções Aprimoradas > Contagem & Matemática > SUMBYFONTBOLD. Veja a captura de tela:
2. Na caixa de diálogo Argumentos da Função, especifique o intervalo com células em negrito que você precisa contar ou somar na caixa Referência e clique no botão OK.
A contagem ou soma de todas as células em negrito no intervalo especificado agora é exibida na célula selecionada. Veja a captura de tela:
Kutools para Excel - Potencialize o Excel com mais de 300 ferramentas essenciais. Aproveite recursos de IA permanentemente gratuitos! Obtenha Agora
Demonstração: Contar e somar células em negrito em um intervalo com Kutools para Excel
Artigos relacionados:
Como identificar e selecionar todas as células ou texto em negrito no Excel?
Melhores Ferramentas de Produtividade para Office
Impulsione suas habilidades no Excel com Kutools para Excel e experimente uma eficiência incomparável. Kutools para Excel oferece mais de300 recursos avançados para aumentar a produtividade e economizar tempo. Clique aqui para acessar o recurso que você mais precisa...
Office Tab traz interface com abas para o Office e facilita muito seu trabalho
- Habilite edição e leitura por abas no Word, Excel, PowerPoint, Publisher, Access, Visio e Project.
- Abra e crie múltiplos documentos em novas abas de uma mesma janela, em vez de em novas janelas.
- Aumente sua produtividade em50% e economize centenas de cliques todos os dias!
Todos os complementos Kutools. Um instalador
O pacote Kutools for Office reúne complementos para Excel, Word, Outlook & PowerPoint, além do Office Tab Pro, sendo ideal para equipes que trabalham em vários aplicativos do Office.
- Pacote tudo-em-um — complementos para Excel, Word, Outlook & PowerPoint + Office Tab Pro
- Um instalador, uma licença — configuração em minutos (pronto para MSI)
- Trabalhe melhor em conjunto — produtividade otimizada entre os aplicativos do Office
- Avaliação completa por30 dias — sem registro e sem cartão de crédito
- Melhor custo-benefício — economize comparado à compra individual de add-ins