Enregistrement date
djfredo
-
cs_Le Pivert Messages postés 8437 Statut Contributeur -
cs_Le Pivert Messages postés 8437 Statut Contributeur -
Bonjour,
sous Windows et dans un fichiers Excel
je souhaiterai que la date du jour apparaisse et soit enregistre en début d'une ligne
lors de la réouverture de ce fichier cette date reste et que la date du jour prenne place sur une nouvelle ligne et cela continuellement tous en gardant l'historique des dates
merci d'avance
sous Windows et dans un fichiers Excel
je souhaiterai que la date du jour apparaisse et soit enregistre en début d'une ligne
lors de la réouverture de ce fichier cette date reste et que la date du jour prenne place sur une nouvelle ligne et cela continuellement tous en gardant l'historique des dates
merci d'avance
1 réponse
-
Bonjour,
en vba faire Alt F11 pour accèder à l'éditeur. Allez dans ThisWorkbook et mettre ce code:
Option Explicit Private Sub Workbook_Open() Dim derligne As Long If Range("A1") = "" Then Range("A1") = Now Else derligne = Range("A" & Rows.Count).End(xlUp).Row + 1 Range("A" & derligne) = Now End If 'sauvegarde avant qu'on ferme sans sauvegarde ActiveWorkbook.Save End Sub
Ensuite enregistrer le classeur acceptant les macros
