en écrivant dans une feuille la date ( et l'heure) de l'ouverture de l'USF 2. par exemple en A1:
Private Sub UserForm_Initialize() ' de la Userform2
Worksheets("Feuil1").Range("A1") = Now() ' pour avoir date et heure ou simplement Date pour la date
End Sub