bonjour !
je cherche comment inscrire automatiquement dans une=20
cellule la date du jour de la derni=E8re modification d'une=20
feuille, une fois qu'elle a =E9t=E9 enregistr=E9e, afin de=20
pouvoir la visualiser quand je rouvre le classeur...
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire
Veuillez sélectionner un problème
Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
Nicolas B.
Salut,
A coller dans ThisWorkbook : Private Sub Workbook_BeforeSave(ByVal SaveAsUI As Boolean, Cancel As Boolean) [A1] = Date End Sub
A+ -- Nicolas B.
bonjour ! je cherche comment inscrire automatiquement dans une cellule la date du jour de la dernière modification d'une feuille, une fois qu'elle a été enregistrée, afin de pouvoir la visualiser quand je rouvre le classeur...
Salut,
A coller dans ThisWorkbook :
Private Sub Workbook_BeforeSave(ByVal SaveAsUI As Boolean, Cancel As
Boolean)
[A1] = Date
End Sub
A+
--
Nicolas B.
bonjour !
je cherche comment inscrire automatiquement dans une
cellule la date du jour de la dernière modification d'une
feuille, une fois qu'elle a été enregistrée, afin de
pouvoir la visualiser quand je rouvre le classeur...
A coller dans ThisWorkbook : Private Sub Workbook_BeforeSave(ByVal SaveAsUI As Boolean, Cancel As Boolean) [A1] = Date End Sub
A+ -- Nicolas B.
bonjour ! je cherche comment inscrire automatiquement dans une cellule la date du jour de la dernière modification d'une feuille, une fois qu'elle a été enregistrée, afin de pouvoir la visualiser quand je rouvre le classeur...
gaston
merci
-----Message d'origine----- Salut,
A coller dans ThisWorkbook : Private Sub Workbook_BeforeSave(ByVal SaveAsUI As Boolean, Cancel As
Boolean) [A1] = Date End Sub
A+ -- Nicolas B.
bonjour ! je cherche comment inscrire automatiquement dans une cellule la date du jour de la dernière modification d'une
feuille, une fois qu'elle a été enregistrée, afin de pouvoir la visualiser quand je rouvre le classeur...
.
merci
-----Message d'origine-----
Salut,
A coller dans ThisWorkbook :
Private Sub Workbook_BeforeSave(ByVal SaveAsUI As
Boolean, Cancel As
Boolean)
[A1] = Date
End Sub
A+
--
Nicolas B.
bonjour !
je cherche comment inscrire automatiquement dans une
cellule la date du jour de la dernière modification
d'une
feuille, une fois qu'elle a été enregistrée, afin de
pouvoir la visualiser quand je rouvre le classeur...
A coller dans ThisWorkbook : Private Sub Workbook_BeforeSave(ByVal SaveAsUI As Boolean, Cancel As
Boolean) [A1] = Date End Sub
A+ -- Nicolas B.
bonjour ! je cherche comment inscrire automatiquement dans une cellule la date du jour de la dernière modification d'une
feuille, une fois qu'elle a été enregistrée, afin de pouvoir la visualiser quand je rouvre le classeur...
.
gaston
je viens de tester. Effectivement, cela marque la date (et l'heure aussi pour peu qu'on rajoute Time) mais cela uniquement sur la feuille sur laquelle on était en sortant. Or mon but serait de pouvoir visualiser rapidemment la date et l'heure de dernière modif de CHAQUE feuille modifiée (modifiée et non simplement ouverte) est-ce possible ?
-----Message d'origine----- Salut,
A coller dans ThisWorkbook : Private Sub Workbook_BeforeSave(ByVal SaveAsUI As Boolean, Cancel As
Boolean) [A1] = Date End Sub
A+ -- Nicolas B.
bonjour ! je cherche comment inscrire automatiquement dans une cellule la date du jour de la dernière modification d'une
feuille, une fois qu'elle a été enregistrée, afin de pouvoir la visualiser quand je rouvre le classeur...
.
je viens de tester. Effectivement, cela marque la date (et
l'heure aussi pour peu qu'on rajoute Time) mais cela
uniquement sur la feuille sur laquelle on était en
sortant. Or mon but serait de pouvoir visualiser
rapidemment la date et l'heure de dernière modif de CHAQUE
feuille modifiée (modifiée et non simplement ouverte)
est-ce possible ?
-----Message d'origine-----
Salut,
A coller dans ThisWorkbook :
Private Sub Workbook_BeforeSave(ByVal SaveAsUI As
Boolean, Cancel As
Boolean)
[A1] = Date
End Sub
A+
--
Nicolas B.
bonjour !
je cherche comment inscrire automatiquement dans une
cellule la date du jour de la dernière modification
d'une
feuille, une fois qu'elle a été enregistrée, afin de
pouvoir la visualiser quand je rouvre le classeur...
je viens de tester. Effectivement, cela marque la date (et l'heure aussi pour peu qu'on rajoute Time) mais cela uniquement sur la feuille sur laquelle on était en sortant. Or mon but serait de pouvoir visualiser rapidemment la date et l'heure de dernière modif de CHAQUE feuille modifiée (modifiée et non simplement ouverte) est-ce possible ?
-----Message d'origine----- Salut,
A coller dans ThisWorkbook : Private Sub Workbook_BeforeSave(ByVal SaveAsUI As Boolean, Cancel As
Boolean) [A1] = Date End Sub
A+ -- Nicolas B.
bonjour ! je cherche comment inscrire automatiquement dans une cellule la date du jour de la dernière modification d'une
feuille, une fois qu'elle a été enregistrée, afin de pouvoir la visualiser quand je rouvre le classeur...
.
Frédéric Sigonneau
Bonjour,
En admettant que tu réserves, sur chaque feuille de ton classeur, la cellule H1 pour y inscrire date et heure de toute modification effectuée, tu peux essayer ce code dans le module ThisWorkbook du classeur :
Private Sub Workbook_SheetChange(ByVal Sh As Object, _ ByVal Target As Range) Sh.Range("H1").Value = Now Sh.Range("H1").NumberFormat = "dd/mm/yyyy hh:mm:ss" End Sub
FS -- Frédéric Sigonneau [MVP Excel - né un sans-culottide] Gestions de temps, VBA pour Excel : http://perso.wanadoo.fr/frederic.sigonneau Si votre question sur Excel est urgente, évitez ma bal !
gaston a écrit:
je viens de tester. Effectivement, cela marque la date (et l'heure aussi pour peu qu'on rajoute Time) mais cela uniquement sur la feuille sur laquelle on était en sortant. Or mon but serait de pouvoir visualiser rapidemment la date et l'heure de dernière modif de CHAQUE feuille modifiée (modifiée et non simplement ouverte) est-ce possible ?
-----Message d'origine----- Salut,
A coller dans ThisWorkbook : Private Sub Workbook_BeforeSave(ByVal SaveAsUI As
Boolean, Cancel As
Boolean) [A1] = Date End Sub
A+ -- Nicolas B.
bonjour ! je cherche comment inscrire automatiquement dans une cellule la date du jour de la dernière modification
d'une
feuille, une fois qu'elle a été enregistrée, afin de pouvoir la visualiser quand je rouvre le classeur...
.
Bonjour,
En admettant que tu réserves, sur chaque feuille de ton classeur, la cellule H1
pour y inscrire date et heure de toute modification effectuée, tu peux essayer
ce code dans le module ThisWorkbook du classeur :
Private Sub Workbook_SheetChange(ByVal Sh As Object, _
ByVal Target As Range)
Sh.Range("H1").Value = Now
Sh.Range("H1").NumberFormat = "dd/mm/yyyy hh:mm:ss"
End Sub
FS
--
Frédéric Sigonneau [MVP Excel - né un sans-culottide]
Gestions de temps, VBA pour Excel :
http://perso.wanadoo.fr/frederic.sigonneau
Si votre question sur Excel est urgente, évitez ma bal !
gaston a écrit:
je viens de tester. Effectivement, cela marque la date (et
l'heure aussi pour peu qu'on rajoute Time) mais cela
uniquement sur la feuille sur laquelle on était en
sortant. Or mon but serait de pouvoir visualiser
rapidemment la date et l'heure de dernière modif de CHAQUE
feuille modifiée (modifiée et non simplement ouverte)
est-ce possible ?
-----Message d'origine-----
Salut,
A coller dans ThisWorkbook :
Private Sub Workbook_BeforeSave(ByVal SaveAsUI As
Boolean, Cancel As
Boolean)
[A1] = Date
End Sub
A+
--
Nicolas B.
bonjour !
je cherche comment inscrire automatiquement dans une
cellule la date du jour de la dernière modification
d'une
feuille, une fois qu'elle a été enregistrée, afin de
pouvoir la visualiser quand je rouvre le classeur...
En admettant que tu réserves, sur chaque feuille de ton classeur, la cellule H1 pour y inscrire date et heure de toute modification effectuée, tu peux essayer ce code dans le module ThisWorkbook du classeur :
Private Sub Workbook_SheetChange(ByVal Sh As Object, _ ByVal Target As Range) Sh.Range("H1").Value = Now Sh.Range("H1").NumberFormat = "dd/mm/yyyy hh:mm:ss" End Sub
FS -- Frédéric Sigonneau [MVP Excel - né un sans-culottide] Gestions de temps, VBA pour Excel : http://perso.wanadoo.fr/frederic.sigonneau Si votre question sur Excel est urgente, évitez ma bal !
gaston a écrit:
je viens de tester. Effectivement, cela marque la date (et l'heure aussi pour peu qu'on rajoute Time) mais cela uniquement sur la feuille sur laquelle on était en sortant. Or mon but serait de pouvoir visualiser rapidemment la date et l'heure de dernière modif de CHAQUE feuille modifiée (modifiée et non simplement ouverte) est-ce possible ?
-----Message d'origine----- Salut,
A coller dans ThisWorkbook : Private Sub Workbook_BeforeSave(ByVal SaveAsUI As
Boolean, Cancel As
Boolean) [A1] = Date End Sub
A+ -- Nicolas B.
bonjour ! je cherche comment inscrire automatiquement dans une cellule la date du jour de la dernière modification
d'une
feuille, une fois qu'elle a été enregistrée, afin de pouvoir la visualiser quand je rouvre le classeur...
.
gaston
merci de ta réponse. On est obligé de réserver la même cellule sur toutes les feuilles ? on ne peut faire en sorte qu'elle puisse être différente suivant la feuille ?
-----Message d'origine----- Bonjour,
En admettant que tu réserves, sur chaque feuille de ton classeur, la cellule H1
pour y inscrire date et heure de toute modification effectuée, tu peux essayer
ce code dans le module ThisWorkbook du classeur :
Private Sub Workbook_SheetChange(ByVal Sh As Object, _ ByVal Target As Range) Sh.Range("H1").Value = Now Sh.Range("H1").NumberFormat = "dd/mm/yyyy hh:mm:ss" End Sub
FS -- Frédéric Sigonneau [MVP Excel - né un sans-culottide] Gestions de temps, VBA pour Excel : http://perso.wanadoo.fr/frederic.sigonneau Si votre question sur Excel est urgente, évitez ma bal !
gaston a écrit:
je viens de tester. Effectivement, cela marque la date (et
l'heure aussi pour peu qu'on rajoute Time) mais cela uniquement sur la feuille sur laquelle on était en sortant. Or mon but serait de pouvoir visualiser rapidemment la date et l'heure de dernière modif de CHAQUE
feuille modifiée (modifiée et non simplement ouverte) est-ce possible ?
-----Message d'origine----- Salut,
A coller dans ThisWorkbook : Private Sub Workbook_BeforeSave(ByVal SaveAsUI As
Boolean, Cancel As
Boolean) [A1] = Date End Sub
A+ -- Nicolas B.
bonjour ! je cherche comment inscrire automatiquement dans une cellule la date du jour de la dernière modification
d'une
feuille, une fois qu'elle a été enregistrée, afin de pouvoir la visualiser quand je rouvre le classeur...
.
.
merci de ta réponse.
On est obligé de réserver la même cellule sur toutes les
feuilles ? on ne peut faire en sorte qu'elle puisse être
différente suivant la feuille ?
-----Message d'origine-----
Bonjour,
En admettant que tu réserves, sur chaque feuille de ton
classeur, la cellule H1
pour y inscrire date et heure de toute modification
effectuée, tu peux essayer
ce code dans le module ThisWorkbook du classeur :
Private Sub Workbook_SheetChange(ByVal Sh As Object, _
ByVal Target As Range)
Sh.Range("H1").Value = Now
Sh.Range("H1").NumberFormat = "dd/mm/yyyy hh:mm:ss"
End Sub
FS
--
Frédéric Sigonneau [MVP Excel - né un sans-culottide]
Gestions de temps, VBA pour Excel :
http://perso.wanadoo.fr/frederic.sigonneau
Si votre question sur Excel est urgente, évitez ma bal !
gaston a écrit:
je viens de tester. Effectivement, cela marque la date
(et
l'heure aussi pour peu qu'on rajoute Time) mais cela
uniquement sur la feuille sur laquelle on était en
sortant. Or mon but serait de pouvoir visualiser
rapidemment la date et l'heure de dernière modif de
CHAQUE
feuille modifiée (modifiée et non simplement ouverte)
est-ce possible ?
-----Message d'origine-----
Salut,
A coller dans ThisWorkbook :
Private Sub Workbook_BeforeSave(ByVal SaveAsUI As
Boolean, Cancel As
Boolean)
[A1] = Date
End Sub
A+
--
Nicolas B.
bonjour !
je cherche comment inscrire automatiquement dans une
cellule la date du jour de la dernière modification
d'une
feuille, une fois qu'elle a été enregistrée, afin de
pouvoir la visualiser quand je rouvre le classeur...
merci de ta réponse. On est obligé de réserver la même cellule sur toutes les feuilles ? on ne peut faire en sorte qu'elle puisse être différente suivant la feuille ?
-----Message d'origine----- Bonjour,
En admettant que tu réserves, sur chaque feuille de ton classeur, la cellule H1
pour y inscrire date et heure de toute modification effectuée, tu peux essayer
ce code dans le module ThisWorkbook du classeur :
Private Sub Workbook_SheetChange(ByVal Sh As Object, _ ByVal Target As Range) Sh.Range("H1").Value = Now Sh.Range("H1").NumberFormat = "dd/mm/yyyy hh:mm:ss" End Sub
FS -- Frédéric Sigonneau [MVP Excel - né un sans-culottide] Gestions de temps, VBA pour Excel : http://perso.wanadoo.fr/frederic.sigonneau Si votre question sur Excel est urgente, évitez ma bal !
gaston a écrit:
je viens de tester. Effectivement, cela marque la date (et
l'heure aussi pour peu qu'on rajoute Time) mais cela uniquement sur la feuille sur laquelle on était en sortant. Or mon but serait de pouvoir visualiser rapidemment la date et l'heure de dernière modif de CHAQUE
feuille modifiée (modifiée et non simplement ouverte) est-ce possible ?
-----Message d'origine----- Salut,
A coller dans ThisWorkbook : Private Sub Workbook_BeforeSave(ByVal SaveAsUI As
Boolean, Cancel As
Boolean) [A1] = Date End Sub
A+ -- Nicolas B.
bonjour ! je cherche comment inscrire automatiquement dans une cellule la date du jour de la dernière modification
d'une
feuille, une fois qu'elle a été enregistrée, afin de pouvoir la visualiser quand je rouvre le classeur...