RE Bonsoir, sorry grave plantage d'ordi impossible de me reconnecter...
Salut Jean-Marie re Hola Stella,
Bon pour continuer en Soluce VBA...
En amettant que ton tableau contienne les codes des employés en colonne "A" l'heure sera automatiquement écrite ou effacée en colonne B...
En Private Module de ta WorkSheet tu mets simplement ceci :
Private Sub Worksheet_Change(ByVal Target As Range)
If Not Application.Intersect(Target, Range("A:A")) Is Nothing Then 'si on est uniquement en colonne A
On Error Resume Next 'si on efface un plage entière
If Target.Value <> "" Then 'Si la cellule n'est pas vide
Target.Offset(0, 1).Value = Format(Now, "HH:MM:SS") ' dans la colonne d'à coté on met l'heure
Else: Target.Offset(0, 1).Value = ""
End If
End If
End Sub
Pour aller dans VBA tu fais la combinaison de touches "ALT + F11"
Puis là tu fais la combinaison de touches "CTRL + R"
Puis dans l'explorateur de Projets tu doubles click sur la feuille qui doit contenir l'Heure automatique...
A partir de là il te reste à adapter Range("A:A") si tu dois travailler ailleurs et Offset(0, 1) si tu dois travailler plus loin que la colonne de droite
(0, 1) = une colonne à Droite...
(0, -1) = une colonne à Gauche...
Voilà qui devrauit te faire comprendre...
Bon Courage et "Buesna Noches" !! lol
