Bonjour,
Je souhaiterai mettre la pagination de mon classeur (193 feuille) dans une cellule sur chaque feuille à la place du pied de page.
( ICI cellule at10 )
Pour cela j'utilise la macro suivante mais suis bloqué sur l'information qu'elle contient :
Sub Macro1()
'
' Macro1 Macro
' Macro enregistrée le 14/10/2015 par Sellier-f
'
' Touche de raccourci du clavier: Ctrl+z
'
'Sub aa()
With ActiveSheet.PageSetup
' MsgBox .LeftFooter, , "à gauche"
' MsgBox .CenterFooter, , "au centre"
' MsgBox .RightFooter, , "à droite"
'---
' [a1] = .LeftFooter
' [b1] = .CenterFooter
[at10] = .RightFooter
.RightFooter = ""
End With
End Sub
Cela fonctionne presque sauf qu'au lieu d'afficher la pagination , la cellule affiche: &P/&N
et je ne suis pas sûr de la ligne : .RightFooter = "" le but étant que l’affichage ne se fasse pas en bas de page.
Quelqu'un pourrait-il me venir en aide en résolvant cette macro svp ?
Bien sur, si ll y a une fonction ou autre système plus direct qu'une macro, je suis preneur ^^
Merci d'avance à ceux qui se pencherons sur le problème