Bonsoir à vous trois,
petite remarque sur le fichier d'AFEH :
lors du pointage, double clic, la coche apparait mais vous entrez en mode de saisie dans le cellule. Enfin sur le fichier que j'ai testé c'est ce qu'il se passe. maintenant cette partie de code peut être simplifiée :
Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
' si on double-clic sur la colonne pointage
If Not Intersect(Target, Range("TAB_1[Pointage]")) Is Nothing Then
' en fonction du contenu on met l'inverse
If Target = "ü" Then Target = "" Else Target = "ü"
' on sort du mode de saisie
Cancel = True
End If
End Sub
Votre code à l'origine permettait de sortir du mode de saisie si l'on ne cliquait pas sur la colonne pointage... et en plus on y afficher soit ü soit rien
Je parle du fichier du message de ... Hey ! il y a eu un "Edit" !
Retraité mais vivace ! Ca c'est les bretons !
@ bientôt
LouReeD