Bonjour à tous,
Perso, à mes yeux ... beaucoup plus commode ... le double clic pour éviter le ' raccourci ' à deux touches ...
Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
' Saisir l'Heure avec un Double Clic - Equivalent Manuel des deux touches Ctrl :
If Target.Column <> 1 Then Exit Sub
Target = Time: Target.NumberFormat = "h:mm AM/PM"
Cancel = True
End Sub
En espèrant que cela t'aide