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
michdenis
Bonjour,
Copie ce qui suit dans le ThisWorkbook de ton classeur :
Tu choisis le format que tu désires : "dddd, dd/mm/yyyy" de même, au lieu de leftFooter, tu peux utiliser CenterFooter ou RightFooter...
La date va apparaître pour toutes les feuilles que tu imprimeras dans ce classeur. '---------------------------------- Private Sub Workbook_BeforePrint(Cancel As Boolean) Dim Sh As Worksheet For Each Sh In Worksheets With Sh With .PageSetup .LeftFooter = Format(Date, "dddd, dd/mm/yyyy") End With End With Next End Sub '----------------------------------
"MOLL PASCAL" <MOLL a écrit dans le message de groupe de discussion : bonjour, Comment formater la date de pied de page dans Excel 2007, comme il est possible de le faire dans Word 2007 ?
Bonjour,
Copie ce qui suit dans le ThisWorkbook de ton classeur :
Tu choisis le format que tu désires : "dddd, dd/mm/yyyy"
de même, au lieu de leftFooter, tu peux utiliser
CenterFooter ou RightFooter...
La date va apparaître pour toutes les feuilles que tu
imprimeras dans ce classeur.
'----------------------------------
Private Sub Workbook_BeforePrint(Cancel As Boolean)
Dim Sh As Worksheet
For Each Sh In Worksheets
With Sh
With .PageSetup
.LeftFooter = Format(Date, "dddd, dd/mm/yyyy")
End With
End With
Next
End Sub
'----------------------------------
"MOLL PASCAL" <MOLL PASCAL@discussions.microsoft.com> a écrit dans le message de groupe de
discussion : BDFFFF56-62BF-4A8A-B6C5-8CCCD678405C@microsoft.com...
bonjour,
Comment formater la date de pied de page dans Excel 2007, comme il est
possible de le faire dans Word 2007 ?
Copie ce qui suit dans le ThisWorkbook de ton classeur :
Tu choisis le format que tu désires : "dddd, dd/mm/yyyy" de même, au lieu de leftFooter, tu peux utiliser CenterFooter ou RightFooter...
La date va apparaître pour toutes les feuilles que tu imprimeras dans ce classeur. '---------------------------------- Private Sub Workbook_BeforePrint(Cancel As Boolean) Dim Sh As Worksheet For Each Sh In Worksheets With Sh With .PageSetup .LeftFooter = Format(Date, "dddd, dd/mm/yyyy") End With End With Next End Sub '----------------------------------
"MOLL PASCAL" <MOLL a écrit dans le message de groupe de discussion : bonjour, Comment formater la date de pied de page dans Excel 2007, comme il est possible de le faire dans Word 2007 ?