Re : insertion automatique de la date et heure
Bonjour
Cliquez sur le triangle au dessus du 1 et à gauche du A (pour selectionner toutes les cellules)
Clic droit. Choisir "format de cellule"
choisir l'onglet protection
décocher vérouiller
Sélectionner la colonne A (en cliquant sur le A), choisir format de cellule, cocher "verouiller" (pour protéger la colonne A
Clic droit sur l'onglet de la feuille
Choisir "visualiser le code"
copier la macro ci dessous
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
lig = Target.Row
If Target.Column = 2 And Len(Cells(lig, 1).Value) = 0 Then
ActiveSheet.Unprotect 'enlever la protection
Cells(lig, 1).Value = Now()
ActiveSheet.Protect DrawingObjects:=True, Contents:=True, Scenarios:=True 'remettre la protection
End If
End Sub
A+ François