Bonjour,
Je souhaiterai inscrire en en tête de page Calendrier et l'année qui se
trouve dans la cellule 'Calendrier!A1'
si je saisi Calendrier & 'Calendrier!A1' ça ne marche pas
si j'ai en A1 = 2005, je souhaiterai avoir comme en tête de page Calendrier
2005
comment doit-on faire
merci à ceux qui savent...
bonne journée
Si tu veux automatiser ça, insère ta macro dans l'évennement 'beforeprint' de 'Thisworkbook' Private Sub Workbook_BeforePrint(Cancel As Boolean)
Bon Dimanche,
Rai
"jl Guitard" a écrit dans le message de news:
Bonjour, Je souhaiterai inscrire en en tête de page Calendrier et l'année qui se trouve dans la cellule 'Calendrier!A1' si je saisi Calendrier & 'Calendrier!A1' ça ne marche pas si j'ai en A1 = 2005, je souhaiterai avoir comme en tête de page Calendrier 2005 comment doit-on faire merci à ceux qui savent... bonne journée
Si tu veux automatiser ça,
insère ta macro dans l'évennement 'beforeprint' de 'Thisworkbook'
Private Sub Workbook_BeforePrint(Cancel As Boolean)
Bon Dimanche,
Rai
"jl Guitard" <jl.guitard@wanadoo.fr> a écrit dans le message de news: eq6nbK7zEHA.1308@TK2MSFTNGP09.phx.gbl...
Bonjour,
Je souhaiterai inscrire en en tête de page Calendrier et l'année qui se
trouve dans la cellule 'Calendrier!A1'
si je saisi Calendrier & 'Calendrier!A1' ça ne marche pas
si j'ai en A1 = 2005, je souhaiterai avoir comme en tête de page Calendrier
2005
comment doit-on faire
merci à ceux qui savent...
bonne journée
Si tu veux automatiser ça, insère ta macro dans l'évennement 'beforeprint' de 'Thisworkbook' Private Sub Workbook_BeforePrint(Cancel As Boolean)
Bon Dimanche,
Rai
"jl Guitard" a écrit dans le message de news:
Bonjour, Je souhaiterai inscrire en en tête de page Calendrier et l'année qui se trouve dans la cellule 'Calendrier!A1' si je saisi Calendrier & 'Calendrier!A1' ça ne marche pas si j'ai en A1 = 2005, je souhaiterai avoir comme en tête de page Calendrier 2005 comment doit-on faire merci à ceux qui savent... bonne journée
E KERGRESSE
Salut JL,
Un exemple de Benead Michel ci-dessous relevé dans ExcelLabo.net à adapter dans ton cas si tu connais VBA.
Il suffit de remplacer
wInfo = "Par " & Application.UserName & " Imprimé le &D à &T"
Comme l'indique le message, cette macro est à mettre dans la partie ThisWorkBook
'--------------------------------------------- Comment récupérer le nom de l'utilisateur dans un Entête et créer cette chaine : Imprimé le &[Date] à &[Heure] par &[Utilisateur] La solution la plus simple est de mettre ce code dans le module événementiel ThisWorkbook du classeur ; de cette façon avant chaque impression ou aperçu, ces informations viendront se mettre là où tu le souhaites.
Private Sub Workbook_BeforePrint(Cancel As Boolean) Dim wInfo As String wInfo = "Par " & Application.UserName & " Imprimé le &D à &T" With ActiveSheet.PageSetup .LeftHeader = "" .CenterHeader = wInfo .RightHeader = "" End With End Sub
En complément, Application.Username renvoie le nom entré dans Outils/Options/General (ce qui n'est pas forcement renseigné) tandis que Environ("username") retourne le nom d'utilisateur fourni lors de l'ouverture de session: le choix est donc à faire en fonction du systeme utilisé. Benead, Michel (msa), (N°937) '--------------------------------"jl Guitard" a écrit dans le message de news:
Bonjour, Je souhaiterai inscrire en en tête de page Calendrier et l'année qui se trouve dans la cellule 'Calendrier!A1' si je saisi Calendrier & 'Calendrier!A1' ça ne marche pas si j'ai en A1 = 2005, je souhaiterai avoir comme en tête de page Calendrier
2005 comment doit-on faire merci à ceux qui savent... bonne journée
Salut JL,
Un exemple de Benead Michel ci-dessous relevé dans ExcelLabo.net à adapter
dans ton cas si tu connais VBA.
Il suffit de remplacer
wInfo = "Par " & Application.UserName & " Imprimé le &D à &T"
Comme l'indique le message, cette macro est à mettre dans la partie
ThisWorkBook
'---------------------------------------------
Comment récupérer le nom de l'utilisateur dans un Entête et créer cette
chaine : Imprimé le
&[Date] à &[Heure] par &[Utilisateur]
La solution la plus simple est de mettre ce code
dans le module événementiel ThisWorkbook du classeur ; de cette façon avant
chaque impression ou aperçu, ces informations viendront se mettre là où tu
le souhaites.
Private Sub Workbook_BeforePrint(Cancel As Boolean)
Dim wInfo As String
wInfo = "Par " & Application.UserName & " Imprimé le &D à &T"
With ActiveSheet.PageSetup
.LeftHeader = ""
.CenterHeader = wInfo
.RightHeader = ""
End With
End Sub
En complément, Application.Username renvoie le nom
entré dans Outils/Options/General (ce qui n'est pas forcement renseigné)
tandis que Environ("username") retourne le nom d'utilisateur fourni lors de
l'ouverture de session: le choix est donc à faire en fonction du systeme
utilisé. Benead, Michel (msa), (N°937)
'--------------------------------"jl Guitard" <jl.guitard@wanadoo.fr> a
écrit dans le message de news: eq6nbK7zEHA.1308@TK2MSFTNGP09.phx.gbl...
Bonjour,
Je souhaiterai inscrire en en tête de page Calendrier et l'année qui se
trouve dans la cellule 'Calendrier!A1'
si je saisi Calendrier & 'Calendrier!A1' ça ne marche pas
si j'ai en A1 = 2005, je souhaiterai avoir comme en tête de page
Calendrier
2005
comment doit-on faire
merci à ceux qui savent...
bonne journée
Comme l'indique le message, cette macro est à mettre dans la partie ThisWorkBook
'--------------------------------------------- Comment récupérer le nom de l'utilisateur dans un Entête et créer cette chaine : Imprimé le &[Date] à &[Heure] par &[Utilisateur] La solution la plus simple est de mettre ce code dans le module événementiel ThisWorkbook du classeur ; de cette façon avant chaque impression ou aperçu, ces informations viendront se mettre là où tu le souhaites.
Private Sub Workbook_BeforePrint(Cancel As Boolean) Dim wInfo As String wInfo = "Par " & Application.UserName & " Imprimé le &D à &T" With ActiveSheet.PageSetup .LeftHeader = "" .CenterHeader = wInfo .RightHeader = "" End With End Sub
En complément, Application.Username renvoie le nom entré dans Outils/Options/General (ce qui n'est pas forcement renseigné) tandis que Environ("username") retourne le nom d'utilisateur fourni lors de l'ouverture de session: le choix est donc à faire en fonction du systeme utilisé. Benead, Michel (msa), (N°937) '--------------------------------"jl Guitard" a écrit dans le message de news:
Bonjour, Je souhaiterai inscrire en en tête de page Calendrier et l'année qui se trouve dans la cellule 'Calendrier!A1' si je saisi Calendrier & 'Calendrier!A1' ça ne marche pas si j'ai en A1 = 2005, je souhaiterai avoir comme en tête de page Calendrier
2005 comment doit-on faire merci à ceux qui savent... bonne journée