Dans un en tête comment peut on faire apparaitre la date à laquelle se
document à été crée ou modifié. Ainsi que l'heure de ces modifications? merci
fbr
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
Jacky
Bonjour,
Fichier/mise en page==>onglet "En-tête/pied de page"==>bouton "En-tête personnalisé" Il y a tout ce qu"il faut.
Salutations JJ
"fbr" a écrit dans le message de news:
Bonjour,
Dans un en tête comment peut on faire apparaitre la date à laquelle se document à été crée ou modifié. Ainsi que l'heure de ces modifications? merci fbr
Bonjour,
Fichier/mise en page==>onglet "En-tête/pied de page"==>bouton "En-tête
personnalisé"
Il y a tout ce qu"il faut.
Salutations
JJ
"fbr" <fbr@discussions.microsoft.com> a écrit dans le message de news:
06F1768F-17A4-4790-818F-41D4ACC130DB@microsoft.com...
Bonjour,
Dans un en tête comment peut on faire apparaitre la date à laquelle se
document à été crée ou modifié. Ainsi que l'heure de ces modifications?
merci
fbr
Fichier/mise en page==>onglet "En-tête/pied de page"==>bouton "En-tête personnalisé" Il y a tout ce qu"il faut.
Salutations JJ
"fbr" a écrit dans le message de news:
Bonjour,
Dans un en tête comment peut on faire apparaitre la date à laquelle se document à été crée ou modifié. Ainsi que l'heure de ces modifications? merci fbr
fbr
BONJOUR?
Désolé mais tout ce que je vois c'est la possibilité de mettre la date d'impression
"Jacky" wrote:
Bonjour,
Fichier/mise en page==>onglet "En-tête/pied de page"==>bouton "En-tête personnalisé" Il y a tout ce qu"il faut.
Salutations JJ
"fbr" a écrit dans le message de news:
Bonjour,
Dans un en tête comment peut on faire apparaitre la date à laquelle se document à été crée ou modifié. Ainsi que l'heure de ces modifications? merci fbr
BONJOUR?
Désolé mais tout ce que je vois c'est la possibilité de mettre la date
d'impression
"Jacky" wrote:
Bonjour,
Fichier/mise en page==>onglet "En-tête/pied de page"==>bouton "En-tête
personnalisé"
Il y a tout ce qu"il faut.
Salutations
JJ
"fbr" <fbr@discussions.microsoft.com> a écrit dans le message de news:
06F1768F-17A4-4790-818F-41D4ACC130DB@microsoft.com...
Bonjour,
Dans un en tête comment peut on faire apparaitre la date à laquelle se
document à été crée ou modifié. Ainsi que l'heure de ces modifications?
merci
fbr
Désolé mais tout ce que je vois c'est la possibilité de mettre la date d'impression
"Jacky" wrote:
Bonjour,
Fichier/mise en page==>onglet "En-tête/pied de page"==>bouton "En-tête personnalisé" Il y a tout ce qu"il faut.
Salutations JJ
"fbr" a écrit dans le message de news:
Bonjour,
Dans un en tête comment peut on faire apparaitre la date à laquelle se document à été crée ou modifié. Ainsi que l'heure de ces modifications? merci fbr
Jacky
Re.. As-tu cliqué sur le bouton "En-tête personnalisé" ?? Tu dois avoir un série icônes, dont une pour la date et une pour l'heure. Si cette date ne convient pas, il y a ceci avec la date et l'heure de la dernière modif. EnVba : '------ Sub jj() Dim fso, awK Set fso = CreateObject("Scripting.FileSystemObject") Set awK = fso.GetFile(ThisWorkbook.FullName) DerD = awK.DateLastModified With ActiveSheet.PageSetup .LeftHeader = Format(DerD, "dddd dd mmmm yy hh:mm") End With Set fso = Nothing Set awK = Nothing End Sub '--------- Le format, au choix.
Salutations JJ
"fbr" a écrit dans le message de news:
BONJOUR?
Désolé mais tout ce que je vois c'est la possibilité de mettre la date d'impression
"Jacky" wrote:
Bonjour,
Fichier/mise en page==>onglet "En-tête/pied de page"==>bouton "En-tête personnalisé" Il y a tout ce qu"il faut.
Salutations JJ
"fbr" a écrit dans le message de news:
Bonjour,
Dans un en tête comment peut on faire apparaitre la date à laquelle se document à été crée ou modifié. Ainsi que l'heure de ces modifications? merci fbr
Re..
As-tu cliqué sur le bouton "En-tête personnalisé" ??
Tu dois avoir un série icônes, dont une pour la date et une pour l'heure.
Si cette date ne convient pas, il y a ceci avec la date et l'heure de la
dernière modif.
EnVba :
'------
Sub jj()
Dim fso, awK
Set fso = CreateObject("Scripting.FileSystemObject")
Set awK = fso.GetFile(ThisWorkbook.FullName)
DerD = awK.DateLastModified
With ActiveSheet.PageSetup
.LeftHeader = Format(DerD, "dddd dd mmmm yy hh:mm")
End With
Set fso = Nothing
Set awK = Nothing
End Sub
'---------
Le format, au choix.
Salutations
JJ
"fbr" <fbr@discussions.microsoft.com> a écrit dans le message de news:
F1005F6A-5159-454E-97F6-589A5FD38859@microsoft.com...
BONJOUR?
Désolé mais tout ce que je vois c'est la possibilité de mettre la date
d'impression
"Jacky" wrote:
Bonjour,
Fichier/mise en page==>onglet "En-tête/pied de page"==>bouton "En-tête
personnalisé"
Il y a tout ce qu"il faut.
Salutations
JJ
"fbr" <fbr@discussions.microsoft.com> a écrit dans le message de news:
06F1768F-17A4-4790-818F-41D4ACC130DB@microsoft.com...
Bonjour,
Dans un en tête comment peut on faire apparaitre la date à laquelle se
document à été crée ou modifié. Ainsi que l'heure de ces modifications?
merci
fbr
Re.. As-tu cliqué sur le bouton "En-tête personnalisé" ?? Tu dois avoir un série icônes, dont une pour la date et une pour l'heure. Si cette date ne convient pas, il y a ceci avec la date et l'heure de la dernière modif. EnVba : '------ Sub jj() Dim fso, awK Set fso = CreateObject("Scripting.FileSystemObject") Set awK = fso.GetFile(ThisWorkbook.FullName) DerD = awK.DateLastModified With ActiveSheet.PageSetup .LeftHeader = Format(DerD, "dddd dd mmmm yy hh:mm") End With Set fso = Nothing Set awK = Nothing End Sub '--------- Le format, au choix.
Salutations JJ
"fbr" a écrit dans le message de news:
BONJOUR?
Désolé mais tout ce que je vois c'est la possibilité de mettre la date d'impression
"Jacky" wrote:
Bonjour,
Fichier/mise en page==>onglet "En-tête/pied de page"==>bouton "En-tête personnalisé" Il y a tout ce qu"il faut.
Salutations JJ
"fbr" a écrit dans le message de news:
Bonjour,
Dans un en tête comment peut on faire apparaitre la date à laquelle se document à été crée ou modifié. Ainsi que l'heure de ces modifications? merci fbr
PpX
bj 1 Menu affichage, 2 En-tête/pied de page 3 - en-tête personnalisé (haut de la feuille) ou pied de page personnalisé (bas de feuille) 4 - mettre le curseur dans l'une des trois parties proposées (gauche, centre ou droit) 5 -cliquez sur le bouton date et sur le bouton heure
Bon courage "fbr" a écrit dans le message de news:
Bonjour,
Dans un en tête comment peut on faire apparaitre la date à laquelle se document à été crée ou modifié. Ainsi que l'heure de ces modifications? merci
fbr
bj
1 Menu affichage,
2 En-tête/pied de page
3 - en-tête personnalisé (haut de la feuille) ou pied de page personnalisé
(bas de feuille)
4 - mettre le curseur dans l'une des trois parties proposées (gauche, centre
ou droit)
5 -cliquez sur le bouton date et sur le bouton heure
Bon courage
"fbr" <fbr@discussions.microsoft.com> a écrit dans le message de
news:06F1768F-17A4-4790-818F-41D4ACC130DB@microsoft.com...
Bonjour,
Dans un en tête comment peut on faire apparaitre la date à laquelle se
document à été crée ou modifié. Ainsi que l'heure de ces modifications?
merci
bj 1 Menu affichage, 2 En-tête/pied de page 3 - en-tête personnalisé (haut de la feuille) ou pied de page personnalisé (bas de feuille) 4 - mettre le curseur dans l'une des trois parties proposées (gauche, centre ou droit) 5 -cliquez sur le bouton date et sur le bouton heure
Bon courage "fbr" a écrit dans le message de news:
Bonjour,
Dans un en tête comment peut on faire apparaitre la date à laquelle se document à été crée ou modifié. Ainsi que l'heure de ces modifications? merci
fbr
fbr
Merci c'est très gentil mais comment fais t'on pour faire du vba comme celui ci et comment l'integrer ?
merci encore
fbr
Re.. As-tu cliqué sur le bouton "En-tête personnalisé" ?? Tu dois avoir un série icônes, dont une pour la date et une pour l'heure. Si cette date ne convient pas, il y a ceci avec la date et l'heure de la dernière modif. EnVba : '------ Sub jj() Dim fso, awK Set fso = CreateObject("Scripting.FileSystemObject") Set awK = fso.GetFile(ThisWorkbook.FullName) DerD = awK.DateLastModified With ActiveSheet.PageSetup .LeftHeader = Format(DerD, "dddd dd mmmm yy hh:mm") End With Set fso = Nothing Set awK = Nothing End Sub '--------- Le format, au choix.
Salutations JJ
"fbr" a écrit dans le message de news:
BONJOUR?
Désolé mais tout ce que je vois c'est la possibilité de mettre la date d'impression
"Jacky" wrote:
Bonjour,
Fichier/mise en page==>onglet "En-tête/pied de page"==>bouton "En-tête personnalisé" Il y a tout ce qu"il faut.
Salutations JJ
"fbr" a écrit dans le message de news:
Bonjour,
Dans un en tête comment peut on faire apparaitre la date à laquelle se document à été crée ou modifié. Ainsi que l'heure de ces modifications? merci fbr
Merci c'est très gentil mais comment fais t'on pour faire du vba comme celui
ci et comment l'integrer ?
merci encore
fbr
Re..
As-tu cliqué sur le bouton "En-tête personnalisé" ??
Tu dois avoir un série icônes, dont une pour la date et une pour l'heure.
Si cette date ne convient pas, il y a ceci avec la date et l'heure de la
dernière modif.
EnVba :
'------
Sub jj()
Dim fso, awK
Set fso = CreateObject("Scripting.FileSystemObject")
Set awK = fso.GetFile(ThisWorkbook.FullName)
DerD = awK.DateLastModified
With ActiveSheet.PageSetup
.LeftHeader = Format(DerD, "dddd dd mmmm yy hh:mm")
End With
Set fso = Nothing
Set awK = Nothing
End Sub
'---------
Le format, au choix.
Salutations
JJ
"fbr" <fbr@discussions.microsoft.com> a écrit dans le message de news:
F1005F6A-5159-454E-97F6-589A5FD38859@microsoft.com...
BONJOUR?
Désolé mais tout ce que je vois c'est la possibilité de mettre la date
d'impression
"Jacky" wrote:
Bonjour,
Fichier/mise en page==>onglet "En-tête/pied de page"==>bouton "En-tête
personnalisé"
Il y a tout ce qu"il faut.
Salutations
JJ
"fbr" <fbr@discussions.microsoft.com> a écrit dans le message de news:
06F1768F-17A4-4790-818F-41D4ACC130DB@microsoft.com...
Bonjour,
Dans un en tête comment peut on faire apparaitre la date à laquelle se
document à été crée ou modifié. Ainsi que l'heure de ces modifications?
merci
fbr
Merci c'est très gentil mais comment fais t'on pour faire du vba comme celui ci et comment l'integrer ?
merci encore
fbr
Re.. As-tu cliqué sur le bouton "En-tête personnalisé" ?? Tu dois avoir un série icônes, dont une pour la date et une pour l'heure. Si cette date ne convient pas, il y a ceci avec la date et l'heure de la dernière modif. EnVba : '------ Sub jj() Dim fso, awK Set fso = CreateObject("Scripting.FileSystemObject") Set awK = fso.GetFile(ThisWorkbook.FullName) DerD = awK.DateLastModified With ActiveSheet.PageSetup .LeftHeader = Format(DerD, "dddd dd mmmm yy hh:mm") End With Set fso = Nothing Set awK = Nothing End Sub '--------- Le format, au choix.
Salutations JJ
"fbr" a écrit dans le message de news:
BONJOUR?
Désolé mais tout ce que je vois c'est la possibilité de mettre la date d'impression
"Jacky" wrote:
Bonjour,
Fichier/mise en page==>onglet "En-tête/pied de page"==>bouton "En-tête personnalisé" Il y a tout ce qu"il faut.
Salutations JJ
"fbr" a écrit dans le message de news:
Bonjour,
Dans un en tête comment peut on faire apparaitre la date à laquelle se document à été crée ou modifié. Ainsi que l'heure de ces modifications? merci fbr
Jacky
Re....
Merci c'est très gentil mais comment fais t'on pour faire du vba comme celui ci
Pour faire du vba comme ceci, il n'y d'autres solutions que de l'apprendre, pour débuter, regarder ici: http://www.excelabo.net/xl/debuter.php
et comment l'integrer ?
Pour rendre actif ce code il doit être coller dans "ThisWorbook" du classeur en question. Pour ce faire: Alt+f11 Dans la fenêtre VBAProjet double clic sur "ThisWorkbook" Dans la grande fenêtre de droite coller ce code:
'------------- Private Sub Workbook_BeforePrint(Cancel As Boolean) Dim fso, awK Set fso = CreateObject("Scripting.FileSystemObject") Set awK = fso.GetFile(ThisWorkbook.FullName) DerD = awK.DateLastModified With ActiveSheet.PageSetup .LeftHeader = Format(DerD, "dddd dd mmmm yy hh:mm") End With Set fso = Nothing Set awK = Nothing End Sub '------------ A chaque demande d'impression, la date et l'heure sera imprimer en haut à gauche de chaque feuille.
Bon courage JJ
"fbr" a écrit dans le message de news:
Merci c'est très gentil mais comment fais t'on pour faire du vba comme celui ci et comment l'integrer ?
merci encore
fbr
Re.. As-tu cliqué sur le bouton "En-tête personnalisé" ?? Tu dois avoir un série icônes, dont une pour la date et une pour l'heure. Si cette date ne convient pas, il y a ceci avec la date et l'heure de la dernière modif. EnVba : '------ Sub jj() Dim fso, awK Set fso = CreateObject("Scripting.FileSystemObject") Set awK = fso.GetFile(ThisWorkbook.FullName) DerD = awK.DateLastModified With ActiveSheet.PageSetup .LeftHeader = Format(DerD, "dddd dd mmmm yy hh:mm") End With Set fso = Nothing Set awK = Nothing End Sub '--------- Le format, au choix.
Salutations JJ
"fbr" a écrit dans le message de news:
BONJOUR?
Désolé mais tout ce que je vois c'est la possibilité de mettre la date d'impression
"Jacky" wrote:
Bonjour,
Fichier/mise en page==>onglet "En-tête/pied de page"==>bouton "En-tête personnalisé" Il y a tout ce qu"il faut.
Salutations JJ
"fbr" a écrit dans le message de news:
Bonjour,
Dans un en tête comment peut on faire apparaitre la date à laquelle se document à été crée ou modifié. Ainsi que l'heure de ces modifications? merci fbr
Re....
Merci c'est très gentil mais comment fais t'on pour faire du vba comme
celui ci
Pour faire du vba comme ceci, il n'y d'autres solutions que de l'apprendre,
pour débuter, regarder ici:
http://www.excelabo.net/xl/debuter.php
et comment l'integrer ?
Pour rendre actif ce code il doit être coller dans "ThisWorbook" du classeur
en question.
Pour ce faire:
Alt+f11
Dans la fenêtre VBAProjet double clic sur "ThisWorkbook"
Dans la grande fenêtre de droite coller ce code:
'-------------
Private Sub Workbook_BeforePrint(Cancel As Boolean)
Dim fso, awK
Set fso = CreateObject("Scripting.FileSystemObject")
Set awK = fso.GetFile(ThisWorkbook.FullName)
DerD = awK.DateLastModified
With ActiveSheet.PageSetup
.LeftHeader = Format(DerD, "dddd dd mmmm yy hh:mm")
End With
Set fso = Nothing
Set awK = Nothing
End Sub
'------------
A chaque demande d'impression, la date et l'heure sera imprimer en haut à
gauche de chaque feuille.
Bon courage
JJ
"fbr" <fbr@discussions.microsoft.com> a écrit dans le message de news:
5AB4F55D-67B5-4752-A0DA-BB3879B6939F@microsoft.com...
Merci c'est très gentil mais comment fais t'on pour faire du vba comme
celui
ci et comment l'integrer ?
merci encore
fbr
Re..
As-tu cliqué sur le bouton "En-tête personnalisé" ??
Tu dois avoir un série icônes, dont une pour la date et une pour l'heure.
Si cette date ne convient pas, il y a ceci avec la date et l'heure de la
dernière modif.
EnVba :
'------
Sub jj()
Dim fso, awK
Set fso = CreateObject("Scripting.FileSystemObject")
Set awK = fso.GetFile(ThisWorkbook.FullName)
DerD = awK.DateLastModified
With ActiveSheet.PageSetup
.LeftHeader = Format(DerD, "dddd dd mmmm yy hh:mm")
End With
Set fso = Nothing
Set awK = Nothing
End Sub
'---------
Le format, au choix.
Salutations
JJ
"fbr" <fbr@discussions.microsoft.com> a écrit dans le message de news:
F1005F6A-5159-454E-97F6-589A5FD38859@microsoft.com...
BONJOUR?
Désolé mais tout ce que je vois c'est la possibilité de mettre la date
d'impression
"Jacky" wrote:
Bonjour,
Fichier/mise en page==>onglet "En-tête/pied de page"==>bouton "En-tête
personnalisé"
Il y a tout ce qu"il faut.
Salutations
JJ
"fbr" <fbr@discussions.microsoft.com> a écrit dans le message de news:
06F1768F-17A4-4790-818F-41D4ACC130DB@microsoft.com...
Bonjour,
Dans un en tête comment peut on faire apparaitre la date à laquelle
se
document à été crée ou modifié. Ainsi que l'heure de ces
modifications?
merci
fbr
Merci c'est très gentil mais comment fais t'on pour faire du vba comme celui ci
Pour faire du vba comme ceci, il n'y d'autres solutions que de l'apprendre, pour débuter, regarder ici: http://www.excelabo.net/xl/debuter.php
et comment l'integrer ?
Pour rendre actif ce code il doit être coller dans "ThisWorbook" du classeur en question. Pour ce faire: Alt+f11 Dans la fenêtre VBAProjet double clic sur "ThisWorkbook" Dans la grande fenêtre de droite coller ce code:
'------------- Private Sub Workbook_BeforePrint(Cancel As Boolean) Dim fso, awK Set fso = CreateObject("Scripting.FileSystemObject") Set awK = fso.GetFile(ThisWorkbook.FullName) DerD = awK.DateLastModified With ActiveSheet.PageSetup .LeftHeader = Format(DerD, "dddd dd mmmm yy hh:mm") End With Set fso = Nothing Set awK = Nothing End Sub '------------ A chaque demande d'impression, la date et l'heure sera imprimer en haut à gauche de chaque feuille.
Bon courage JJ
"fbr" a écrit dans le message de news:
Merci c'est très gentil mais comment fais t'on pour faire du vba comme celui ci et comment l'integrer ?
merci encore
fbr
Re.. As-tu cliqué sur le bouton "En-tête personnalisé" ?? Tu dois avoir un série icônes, dont une pour la date et une pour l'heure. Si cette date ne convient pas, il y a ceci avec la date et l'heure de la dernière modif. EnVba : '------ Sub jj() Dim fso, awK Set fso = CreateObject("Scripting.FileSystemObject") Set awK = fso.GetFile(ThisWorkbook.FullName) DerD = awK.DateLastModified With ActiveSheet.PageSetup .LeftHeader = Format(DerD, "dddd dd mmmm yy hh:mm") End With Set fso = Nothing Set awK = Nothing End Sub '--------- Le format, au choix.
Salutations JJ
"fbr" a écrit dans le message de news:
BONJOUR?
Désolé mais tout ce que je vois c'est la possibilité de mettre la date d'impression
"Jacky" wrote:
Bonjour,
Fichier/mise en page==>onglet "En-tête/pied de page"==>bouton "En-tête personnalisé" Il y a tout ce qu"il faut.
Salutations JJ
"fbr" a écrit dans le message de news:
Bonjour,
Dans un en tête comment peut on faire apparaitre la date à laquelle se document à été crée ou modifié. Ainsi que l'heure de ces modifications? merci fbr