Como contar o total de cliques em uma célula específica no Excel?

Este artigo discute como contar o total de cliques em uma célula específica no Excel.

Conte o total de cliques em uma célula específica com código VBA

Conte o total de cliques em uma célula específica com código VBA

Por favor, siga os passos abaixo para contar o total de cliques em uma célula específica no Excel.

1. Na planilha que contém a célula na qual você precisa contar o total de cliques, clique com o botão direito na aba da planilha e depois clique em Visualizar Código no menu de contexto.

2. Na janela Microsoft Visual Basic for Applications, copie e cole o seguinte código VBA na janela de Código.

Código VBA: Contar o total de cliques em uma célula específica no Excel

Public xRgS, xRgD As Range
Public xNum As Long
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
    On Error Resume Next
    If Target.Cells.Count > 1 Then Exit Sub
    Set xRgS = Range("E2")
    If xRgS Is Nothing Then Exit Sub
    Set xRgD = Range("H2")
    If xRgD Is Nothing Then Exit Sub
    If Intersect(xRgS, Target) Is Nothing Then Exit Sub
    xNum = xNum + 1
    xRgD.Value = xNum
End Sub

Observação: No código, E2 é a célula na qual você precisa contar o total de cliques, e H2 é a célula de saída da contagem. Altere-as conforme necessário.

3. Pressione as teclas Alt + Q para fechar a janela Microsoft Visual Basic for Applications.

A partir de agora, ao clicar na célula E2 nesta planilha específica, o total de cliques será automaticamente preenchido na célula H2, conforme mostrado na captura de tela abaixo. Por exemplo, se você clicar na célula E2 cinco vezes, o número 5 será exibido na célula H2.

Desbloqueie a Magia do Excel com o Kutools AI

• Execução Inteligente: Realize operações de células, analise dados e crie gráficos — tudo impulsionado por comandos simples.
• Fórmulas Personalizadas: Gere fórmulas sob medida para otimizar seus fluxos de trabalho.
• Codificação VBA: Escreva e implemente código VBA sem esforço.
• Interpretação de Fórmulas: Compreenda fórmulas complexas com facilidade.
• Tradução de Texto: Supere barreiras linguísticas dentro de suas planilhas.

Potencialize suas capacidades no Excel com ferramentas alimentadas por IA. Baixe Agora e experimente uma eficiência como nunca antes!