S
Stéphane
Guest
Bonjour à tous,
Dans les versions d'excel antérieur à 2002 nous ne pouvons pas imprimer en en-tête ou pied de page le chemin complet d'un classeur.
Par contre, il existe une macro pour cela :
Private Sub Workbook_BeforePrint(Cancel As Boolean)
For Each sht In ThisWorkbook.Sheets
sht.PageSetup.LeftFooter = "&8" & ThisWorkbook.FullName
Next sht
End Sub
Elle fonctionne bien dans n'importe quel fichier mais il faut l'inclure dans le module "ThisWorkbook" du fichier sur lequel on travaille.
J'ai essayé de l'inclure dans "ThisWorkbook" du claseur "PERSO.XLS" pour faire fonctionner cette macro sur n'importe quel fichier sur lequel je serai succeptible de travailler dans le futur, mais cela ne fonctionne pas !??
Est-ce donc impossible ???
Merci à tous pour vos lumières.
Stéphane.
Dans les versions d'excel antérieur à 2002 nous ne pouvons pas imprimer en en-tête ou pied de page le chemin complet d'un classeur.
Par contre, il existe une macro pour cela :
Private Sub Workbook_BeforePrint(Cancel As Boolean)
For Each sht In ThisWorkbook.Sheets
sht.PageSetup.LeftFooter = "&8" & ThisWorkbook.FullName
Next sht
End Sub
Elle fonctionne bien dans n'importe quel fichier mais il faut l'inclure dans le module "ThisWorkbook" du fichier sur lequel on travaille.
J'ai essayé de l'inclure dans "ThisWorkbook" du claseur "PERSO.XLS" pour faire fonctionner cette macro sur n'importe quel fichier sur lequel je serai succeptible de travailler dans le futur, mais cela ne fonctionne pas !??
Est-ce donc impossible ???
Merci à tous pour vos lumières.
Stéphane.