Comment compter le nombre total de clics dans une cellule spécifiée dans Excel ?

Cet article traite du comptage du nombre total de clics dans une cellule spécifiée dans Excel.

Compter le nombre total de clics dans une cellule spécifiée avec un code VBA

Compter le nombre total de clics dans une cellule spécifiée avec un code VBA

Veuillez procéder comme suit pour compter le nombre total de clics dans une cellule spécifiée dans Excel.

1. Dans la feuille de calcul contenant la cellule dont vous devez compter les clics totaux, faites un clic droit sur l'onglet de la feuille, puis cliquez sur Affichage du code dans le menu contextuel.

2. Dans la fenêtre Microsoft Visual Basic for Applications, copiez et collez le code VBA ci-dessous dans la fenêtre Code.

Code VBA : Compter le nombre total de clics dans une cellule spécifiée dans 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

Remarque : Dans le code, E2 est la cellule dont vous devez compter les clics totaux, et H2 est la cellule de sortie du comptage. Modifiez-les selon vos besoins.

3. Appuyez sur les touches Alt + Q pour fermer la fenêtre Microsoft Visual Basic for Applications.

Dès maintenant, lorsque vous cliquez sur la cellule E2 dans cette feuille de calcul spécifiée, le nombre total de clics sera automatiquement affiché dans la cellule H2, comme le montre la capture d'écran ci-dessous. Par exemple, si vous cliquez 5 fois sur la cellule E2, le chiffre 5 sera affiché dans la cellule H2.

Découvrez la magie d'Excel avec Kutools AI

• Exécution intelligente : Effectuez des opérations sur les cellules, analysez les données et créez des graphiques, le tout piloté par des commandes simples.
• Formules personnalisées : Générez des formules adaptées pour rationaliser vos flux de travail.
• Codage VBA : Écrivez et implémentez du code VBA sans effort.
• Interprétation des formules : Comprenez facilement des formules complexes.
• Traduction de texte : Surmontez les barrières linguistiques dans vos feuilles de calcul.

Améliorez vos capacités Excel avec des outils alimentés par l'IA. Téléchargez maintenant et découvrez une efficacité sans précédent !