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 Mag,
Si tu désires que tous tes futurs classeurs possèdent cette façon de faire au moment de l'impression :
A ) ouvre un classeur vierge
B ) copie dans le thisWorbook la procédure suivante : '--------------------------- Private Sub Workbook_BeforePrint(Cancel As Boolean)
Dim Sh As Worksheet
For Each Sh In ActiveWindow.SelectedSheets With Sh .PageSetup.LeftFooter = Format(Date, "dd/mm/yy") End With Next Set Sh = Nothing
End Sub '---------------------------
C ) Enregistre ton fichier comme modèle Si tu as Excel 97 , le nom du modèle DOIT être : "Class.xlt" Si tu as une version plus récente, le nom du modèle : "Classeur.xlt"
D ) Tu places ce modèle dans le répertoire XlStart ou Xlouvrir selon la version d'excel que tu possèdes.
Salutations!
"MAG" a écrit dans le message de news:3c6e01c4ac42$58685cb0$ Bonjour,
Je souhaite modifier mon modèle standard de feuille
Dès ouverture d'Excel ou nouveau classeur, je souhaite mettre en pied de page date et nom de fichier
Merci d'avance
Bonjour Mag,
Si tu désires que tous tes futurs classeurs possèdent cette façon de faire au moment de l'impression :
A ) ouvre un classeur vierge
B ) copie dans le thisWorbook la procédure suivante :
'---------------------------
Private Sub Workbook_BeforePrint(Cancel As Boolean)
Dim Sh As Worksheet
For Each Sh In ActiveWindow.SelectedSheets
With Sh
.PageSetup.LeftFooter = Format(Date, "dd/mm/yy")
End With
Next
Set Sh = Nothing
End Sub
'---------------------------
C ) Enregistre ton fichier comme modèle
Si tu as Excel 97 , le nom du modèle DOIT être : "Class.xlt"
Si tu as une version plus récente, le nom du modèle : "Classeur.xlt"
D ) Tu places ce modèle dans le répertoire XlStart ou Xlouvrir selon la version d'excel que tu possèdes.
Salutations!
"MAG" <mtreille@rclens.fr> a écrit dans le message de news:3c6e01c4ac42$58685cb0$a501280a@phx.gbl...
Bonjour,
Je souhaite modifier mon modèle standard de feuille
Dès ouverture d'Excel ou nouveau classeur,
je souhaite mettre en pied de page date et nom de fichier
Si tu désires que tous tes futurs classeurs possèdent cette façon de faire au moment de l'impression :
A ) ouvre un classeur vierge
B ) copie dans le thisWorbook la procédure suivante : '--------------------------- Private Sub Workbook_BeforePrint(Cancel As Boolean)
Dim Sh As Worksheet
For Each Sh In ActiveWindow.SelectedSheets With Sh .PageSetup.LeftFooter = Format(Date, "dd/mm/yy") End With Next Set Sh = Nothing
End Sub '---------------------------
C ) Enregistre ton fichier comme modèle Si tu as Excel 97 , le nom du modèle DOIT être : "Class.xlt" Si tu as une version plus récente, le nom du modèle : "Classeur.xlt"
D ) Tu places ce modèle dans le répertoire XlStart ou Xlouvrir selon la version d'excel que tu possèdes.
Salutations!
"MAG" a écrit dans le message de news:3c6e01c4ac42$58685cb0$ Bonjour,
Je souhaite modifier mon modèle standard de feuille
Dès ouverture d'Excel ou nouveau classeur, je souhaite mettre en pied de page date et nom de fichier