Bonjour à tous,
J'ai mis dans Excel 2013 la procédure ci-dessous dans "Thisworkbook"
Quand on modifie une cellule, elle met la date et l'heure dans la cellule à sa droite
Mon problème est que la validation doit se faire avec la touche Entrée, sinon la macro ne fonctionne pas.
Je souhaiterai que la touche Tabulation soit prise en compte.
Je ne suis pas spécialiste des macro, est-ce que c'est possible.
Merci d'avance pour vos réponse ;-)
Private Sub Workbook_SheetChange(ByVal Sh As Object, ByVal Target As Range)
' Procedure pour mettre une date automatiquement à la création et non modifiable
' On met la date + heure à droite
ActiveSheet.Unprotect
ActiveCell.Offset(-1, 1).Select
ActiveCell = Format(Now, "yyyy/mm/dd hh:mm:ss")
ActiveSheet.Protect
ActiveCell.Offset(0, -1).Select
End Sub
J'ai mis dans Excel 2013 la procédure ci-dessous dans "Thisworkbook"
Quand on modifie une cellule, elle met la date et l'heure dans la cellule à sa droite
Mon problème est que la validation doit se faire avec la touche Entrée, sinon la macro ne fonctionne pas.
Je souhaiterai que la touche Tabulation soit prise en compte.
Je ne suis pas spécialiste des macro, est-ce que c'est possible.
Merci d'avance pour vos réponse ;-)
Private Sub Workbook_SheetChange(ByVal Sh As Object, ByVal Target As Range)
' Procedure pour mettre une date automatiquement à la création et non modifiable
' On met la date + heure à droite
ActiveSheet.Unprotect
ActiveCell.Offset(-1, 1).Select
ActiveCell = Format(Now, "yyyy/mm/dd hh:mm:ss")
ActiveSheet.Protect
ActiveCell.Offset(0, -1).Select
End Sub