double clic excel 2007 Résolu/Fermé

Question

Bonjour, 

Je vous explique mon problème.
j'aimerai que lorsque je double clic sur une cellule, un 1 apparaisse et redevienne 0 si je double clic a nouveau dessus.
Je ne sais pas si je suis bien claire et pour info je suis asses limité en connaissance excel.
merci d'avance

f894009 · Answer

Bonjour,

Code a mettre dans le VBA de la feuille ou vous voulez double-cliquer vos cellules

Ouvrir le VBA par Alt+F11
fenetre en haut a gauche: doubleclick gauche sur la feuille de votre choix
fenetre a droite click gauche coller le code

fonction ok pour cellule A1 a A5 dans cet exemple.

Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
  'Plage a definir
  If Not Application.Intersect(Target, Range("A1:A5")) Is Nothing Then
    Cancel = True
    If ActiveCell.Value = 1 Then
      ActiveCell.Value = 0
    Else
      ActiveCell.Value = 1
    End If
  End If
End Sub


Bon courage

Double clic excel 2007

1 réponse