¿Cómo contar el total de clics en una celda específica en Excel?
Este artículo trata sobre cómo contar el total de clics en una celda específica en Excel.
Contar el total de clics en una celda específica con código VBA
Contar el total de clics en una celda específica con código VBA
Por favor, sigue los siguientes pasos para contar el total de clics en una celda específica en Excel.
1. En la hoja de cálculo que contiene la celda en la que necesitas contar el total de clics, haz clic derecho en la pestaña de la hoja y luego haz clic en Ver Código en el menú contextual.
2. En la ventana de Microsoft Visual Basic for Applications, copia y pega el siguiente código VBA en la ventana de Código.
Código VBA: Contar el total de clics en una celda específica en 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
Nota: En el código, E2 es la celda en la que necesitas contar el total de clics, y H2 es la celda de salida del recuento. Por favor, cámbialas según sea necesario.
3. Presiona las teclas Alt + Q para cerrar la ventana de Microsoft Visual Basic for Applications.
A partir de ahora, al hacer clic en la celda E2 en esta hoja de cálculo específica, el total de clics se completará automáticamente en la celda H2, como se muestra en la siguiente captura de pantalla. Por ejemplo, si haces clic en la celda E2 cinco veces, el número 5 se mostrará en la celda H2.

Descubre la Magia de Excel con Kutools AI
- Ejecución Inteligente: Realiza operaciones en celdas, analiza datos y crea gráficos, todo impulsado por comandos simples.
- Fórmulas Personalizadas: Genera fórmulas adaptadas para optimizar tus flujos de trabajo.
- Codificación VBA: Escribe e implementa código VBA sin esfuerzo.
- Interpretación de Fórmulas: Comprende fórmulas complejas con facilidad.
- Traducción de Texto: Supera las barreras del idioma dentro de tus hojas de cálculo.
Las mejores herramientas de productividad para Office
Potencia tus habilidades en Excel con Kutools para Excel y experimenta una eficiencia sin precedentes. Kutools para Excel ofrece más de300 funciones avanzadas para aumentar la productividad y ahorrar tiempo. Haz clic aquí para obtener la función que más necesitas...
Office Tab lleva la interfaz de pestañas a Office y facilita mucho tu trabajo
- Habilita la edición y lectura con pestañas en Word, Excel, PowerPoint, Publisher, Access, Visio y Project.
- Abre y crea varios documentos en nuevas pestañas de la misma ventana, en lugar de nuevas ventanas.
- ¡Aumenta tu productividad en un50% y reduce cientos de clics de ratón cada día!