bonjour,
J'ai trouvé ce code qui permet, lorsqu'on saisit un nom d'utilisateur en colonne A, permet d'afficher automatiquement la date et l'heure de la saisie...
Cependant afin d'eviter de saisir à chaque fois les noms d'utilisateurs, j'ai crée une liste déroulante comportant l'ensemble des utilisateurs.
Et là ca coince, car la date et l'heure de la saisie ne s'affiche plus...
Pourriez vous m'aider car je n'y connais rien en VBA
D'avance merci... ci joint le code
Sub auto_open()
ActiveWorkbook.Worksheets("feuil1").OnEntry = "ecrit_date"
End Sub
Sub ecrit_date()
If ActiveCell.Column = 1 And ActiveCell.Offset(0, 1) = "" Then
ActiveCell.Offset(0, 1).Value = Now
End If
End Sub
J'ai trouvé ce code qui permet, lorsqu'on saisit un nom d'utilisateur en colonne A, permet d'afficher automatiquement la date et l'heure de la saisie...
Cependant afin d'eviter de saisir à chaque fois les noms d'utilisateurs, j'ai crée une liste déroulante comportant l'ensemble des utilisateurs.
Et là ca coince, car la date et l'heure de la saisie ne s'affiche plus...
Pourriez vous m'aider car je n'y connais rien en VBA
D'avance merci... ci joint le code
Sub auto_open()
ActiveWorkbook.Worksheets("feuil1").OnEntry = "ecrit_date"
End Sub
Sub ecrit_date()
If ActiveCell.Column = 1 And ActiveCell.Offset(0, 1) = "" Then
ActiveCell.Offset(0, 1).Value = Now
End If
End Sub