en tete page vba
Le
andre

Bonjour,
Je voudrais savoir quel est le code vba pour définir l'année uniquement
au lieu de la date complete, dans ce module (dans thisworkbook) :
ApplicationScreenUpdating = False
For x = 1 To Sheets.Count
With Sheets(x).PageSetup
.LeftFooter = "&G&18xxxxx"
.RightHeader = "&G&18" & [A2] & "_" & "&D" (que mettre pour
année 2015)
.CenterFooter = "&G&16 renseignements engagements et
compétitions :
End With
merci
--
André
Je voudrais savoir quel est le code vba pour définir l'année uniquement
au lieu de la date complete, dans ce module (dans thisworkbook) :
ApplicationScreenUpdating = False
For x = 1 To Sheets.Count
With Sheets(x).PageSetup
.LeftFooter = "&G&18xxxxx"
.RightHeader = "&G&18" & [A2] & "_" & "&D" (que mettre pour
année 2015)
.CenterFooter = "&G&16 renseignements engagements et
compétitions :
End With
merci
--
André
Remplace
.RightHeader = "&G&18" & [A2] & "_" & "&D"
par
.RightHeader = "&G&18" & [A2] & "_" & Format(Date, "yyyy")
--
Salutations
JJ
"andre"
Ou plus court ;o)
'---------
.RightHeader = "&G&18" & [A2] & "_" & Year(Date)
'---------
--
Salutations
JJ
merci Jacky
--
André