¿Cómo contar los clics totales en una celda específica en Excel?
Este artículo habla sobre el recuento de clics totales en una celda específica en Excel.
Cuente los clics totales en una celda específica con código VBA
Cuente los clics totales en una celda específica con código VBA
Haga lo siguiente para contar los clics totales en una celda específica en Excel.
1. En la hoja de trabajo contiene la celda que necesita para contar el total de clics, haga clic con el botón derecho en la pestaña de la hoja y luego haga clic en Ver código desde el menú contextual.
2. En el Microsoft Visual Basic para aplicaciones ventana, copie y pegue debajo del código VBA en la ventana Código.
Código de VBA: cuente los clics totales en una celda especificada 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
Note: En el código, E2 es la celda que necesita para contar sus clics totales, y H2 es la celda de salida del conteo. Cámbielos según sea necesario.
3. presione el otro + Q llaves para cerrar el Microsoft Visual Basic para aplicaciones ventana.
De ahora en adelante, al hacer clic en la celda E2 en esta hoja de trabajo especificada, el total de clics se completará automáticamente en la celda H2 como se muestra a continuación. Por ejemplo, si hace clic en la celda E2 5 veces, el número 5 se mostrará en la celda H2.
Las mejores herramientas de productividad de oficina
Mejore sus habilidades de Excel con Kutools for Excel y experimente la eficiencia como nunca antes. Kutools for Excel ofrece más de 300 funciones avanzadas para aumentar la productividad y ahorrar tiempo. Haga clic aquí para obtener la función que más necesita...
Office Tab lleva la interfaz con pestañas a Office y hace que su trabajo sea mucho más fácil
- Habilite la edición y lectura con pestañas en Word, Excel, PowerPoint, Publisher, Access, Visio y Project.
- Abra y cree varios documentos en nuevas pestañas de la misma ventana, en lugar de en nuevas ventanas.
- ¡Aumenta su productividad en un 50% y reduce cientos de clics del mouse todos los días!