Date mise a jour excel
anne26
Messages postés
35
Statut
Membre
-
anne26 -
anne26 -
Bonjour,
une nouvelle petite question..
j'aimerais savoir s'il etait possible d'inserer sur excel la date de la derniere mise à jour du classeur qui restera inchanger jusqu'a la prochaine mise a jour meme si on ouvre le fichier entre temps(et non pas la date du jour qui changerais a chaque ouverture du fichier).
merci d'avance
une nouvelle petite question..
j'aimerais savoir s'il etait possible d'inserer sur excel la date de la derniere mise à jour du classeur qui restera inchanger jusqu'a la prochaine mise a jour meme si on ouvre le fichier entre temps(et non pas la date du jour qui changerais a chaque ouverture du fichier).
merci d'avance
A voir également:
- Date mise a jour excel
- Mise a jour chrome - Accueil - Applications & Logiciels
- Mise a jour windows 10 - Accueil - Mise à jour
- Mise en forme conditionnelle excel - Guide
- Liste déroulante excel - Guide
- Nombre de jours entre deux dates excel - Guide
7 réponses
pourquoi ll'as tu coller dans thisworkbook ?
Si tu veux que ca apparaisse à l'ouverture du fichier ( tu n'avais pas préciser...c'est çà?)
Private Sub Workbook_Open()
range("A1")= ActiveWorkbook.BuiltinDocumentProperties(12)
End Sub
Si tu veux que ca apparaisse à l'ouverture du fichier ( tu n'avais pas préciser...c'est çà?)
Private Sub Workbook_Open()
range("A1")= ActiveWorkbook.BuiltinDocumentProperties(12)
End Sub
j'ai toruver quelque chose mais est ce possible d'adapter ce code pour que si on modifie la feuil3 par exemple la date change mais si on modifie une autre que la feuil3 la date ne bouge pas??du genre" if modif feuil3.....".
La pour le moment quelque soit la feullie sur laquelle une modif est faite la date change.
Voila le code :
merci d'avance
La pour le moment quelque soit la feullie sur laquelle une modif est faite la date change.
Voila le code :
Dim modif As Boolean
Private Sub Workbook_BeforeClose(Cancel As Boolean)
If modif = True Then
Sheets("Feuil1").Range("A1").Value = "Dernière Révision le " & Format(Date, "dd/mm/yyyy")
Sheets("Feuil2").Range("A1").Value = "Dernière Révision le " & Format(Date, "dd/mm/yyyy")
Sheets("Feuil3").Range("A1").Value = "Dernière Révision le " & Format(Date, "dd/mm/yyyy")
End If
End Sub
Private Sub Workbook_SheetChange(ByVal Sh As Object, ByVal Target As Range)
modif = True
End Sub
merci d'avance
merci pour ta réponse mais ne connaissant pas le langage VBA pourrais tu me dire ce qu'il faut mettre avant et apres
"range" (sub ou quelque chose comme ca je crois??)
merci
"range" (sub ou quelque chose comme ca je crois??)
merci
Vous n’avez pas trouvé la réponse que vous recherchez ?
Posez votre question
je ne comprend pas j'ai copier/coller ton code dans this workbook mais ca ne marche pas . il n'y a pas de message d'errreur mais rien ne s'affiche??
ca y est ca marche mais je vois que en faite ca change des qu'on enregistre le fichier et je voudrais savoir si c'etait possible de faire la meme chose mais comme ca : je m'explique : en faite mon fichier Excel est alimenté grace a des importations de fichier access (vers excel). j'aimerais que la date change à chaque importation et non pas a chaque enregistrement est ce possible??
