Microsoft 365 Contenu d'une cellule dans l'en tête & pied de page

Emile63

XLDnaute Junior
Bonjour à tous et bonne année.
Savez-vous s'il y a une possibilité d'afficher en entête ou pied de page le contenu d'une cellule?
Sans VBA serait l'idéale, si pas possible alors avec!
Merci d'avance pour vos propositions et bonne journée à tous.
Emile
 
Solution
Salut à tous
Oups Shuars est déjà passé par là.
Du coup je pposte quand même
VB:
Sub Entete()
    With ActiveSheet.PageSetup
        .LeftHeader = ""
        .CenterHeader = [C9]        'Cellule C9
        .RightHeader = ""
    End With
End Sub

VB:
Sub PiedDePage()
    With ActiveSheet.PageSetup
        .LeftFooter = ""
        .CenterFooter = [C10]       'Cellule C10
        .RightFooter = ""
    End With
End Sub
@+ Lolote83

ShuarS

XLDnaute Occasionnel
Salut et bonne année également,
J'ai retrouvé ça comme exemple :
Pas directement, mais avec VBA :
VB:
Sub PiedDePage()
     With ActiveSheet.PageSetup
     .LeftHeader = Int(Range("A1"))
     .CenterHeader = Format(Range("A2"), "# ##0")
     End With
 End Sub


Shu
 

Lolote83

XLDnaute Barbatruc
Salut à tous
Oups Shuars est déjà passé par là.
Du coup je pposte quand même
VB:
Sub Entete()
    With ActiveSheet.PageSetup
        .LeftHeader = ""
        .CenterHeader = [C9]        'Cellule C9
        .RightHeader = ""
    End With
End Sub

VB:
Sub PiedDePage()
    With ActiveSheet.PageSetup
        .LeftFooter = ""
        .CenterFooter = [C10]       'Cellule C10
        .RightFooter = ""
    End With
End Sub
@+ Lolote83
 

Discussions similaires

Membres actuellement en ligne

Aucun membre en ligne actuellement.

Statistiques des forums

Discussions
312 305
Messages
2 087 084
Membres
103 459
dernier inscrit
Arnocal