EXCEL Cellule cliquable "+1"

Résolu/Fermé
Will - 4 mars 2010 à 18:11
eriiic Messages postés 24579 Date d'inscription mardi 11 septembre 2007 Statut Contributeur Dernière intervention 3 juin 2024 - 5 mars 2010 à 07:14
Bonjour,
Je souhaite créer un cellule cliquable qui ajouterait 1 dans une autre cellule.

Je n'ai aucune notion de VBA... Si quelqu'un peut me donner la formule.

Merci beaucoup.

6 réponses

eriiic Messages postés 24579 Date d'inscription mardi 11 septembre 2007 Statut Contributeur Dernière intervention 3 juin 2024 7 221
4 mars 2010 à 22:45
Bonsoir,

Si ça ne te dérange pas je préfère le faire sur un double-clic.
Ca évite les erreurs sur les clics nerveux, et sur l'évènement SelectionChange ça t'obligerait à cliquer ailleurs avant de re-cliquer dessus pour le prendre en compte.
Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
    If Intersect(Target, [A1]) Is Nothing Then Exit Sub
        [B1].Value = [B1].Value + 1
        Cancel = True
End Sub


Remarque : le double-clic pourrait aussi avoir lieu sur la cellule du compteur aussi

eric
1