Bonjour,
A l'attention des experts d'excel, existe-t-il un moyen de faire référence
au contenu d'une cellule dans les en-tête ou les pieds de page, et plus
généralement, peut-on y employer des formules ?
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire
Veuillez sélectionner un problème
Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
Michel Gaboly
Bonjour,
Pas directement, mais avec VBA :
Sub PiedDePage() With ActiveSheet.PageSetup .LeftHeader = Int(Range("A1")) .CenterHeader = Format(Range("A2"), "# ##0") End With End Sub
C'est un exemple, mais il n'y a ppratiquement aucune limitation.
Bonjour, A l'attention des experts d'excel, existe-t-il un moyen de faire référence au contenu d'une cellule dans les en-tête ou les pieds de page, et plus généralement, peut-on y employer des formules ?
Merci pour vos réponses. Cordialement
-- Cordialement,
Michel Gaboly www.gaboly.com
Bonjour,
Pas directement, mais avec VBA :
Sub PiedDePage()
With ActiveSheet.PageSetup
.LeftHeader = Int(Range("A1"))
.CenterHeader = Format(Range("A2"), "# ##0")
End With
End Sub
C'est un exemple, mais il n'y a ppratiquement aucune limitation.
Bonjour,
A l'attention des experts d'excel, existe-t-il un moyen de faire référence
au contenu d'une cellule dans les en-tête ou les pieds de page, et plus
généralement, peut-on y employer des formules ?
Sub PiedDePage() With ActiveSheet.PageSetup .LeftHeader = Int(Range("A1")) .CenterHeader = Format(Range("A2"), "# ##0") End With End Sub
C'est un exemple, mais il n'y a ppratiquement aucune limitation.
Bonjour, A l'attention des experts d'excel, existe-t-il un moyen de faire référence au contenu d'une cellule dans les en-tête ou les pieds de page, et plus généralement, peut-on y employer des formules ?
Merci pour vos réponses. Cordialement
-- Cordialement,
Michel Gaboly www.gaboly.com
michdenis
Bonjour François,
Il est possible d'afficher une formule ou son résultat au moment de l'impression avec une macro.
Il est possible d'utiliser cet événement du ThisWorkbook pour déclencher l'opération : '--------------------- Private Sub Workbook_BeforePrint(Cancel As Boolean) 'Le code End Sub '----------------------
With Worksheets("Feuil1") With .PageSetup 'Affiche la formule contenu dans la cellule A1 .LeftFooter = Feuil1.Range("A1").FormulaLocal 'Affiche le résultat de la cellule A1 .CenterFooter = Feuil1.Range("A1").Value End With .PrintPreview End With
Salutations!
"François Marques" a écrit dans le message de news: 439d7896$0$18322$ Bonjour, A l'attention des experts d'excel, existe-t-il un moyen de faire référence au contenu d'une cellule dans les en-tête ou les pieds de page, et plus généralement, peut-on y employer des formules ?
Merci pour vos réponses. Cordialement
Bonjour François,
Il est possible d'afficher une formule ou son résultat au moment de l'impression avec une macro.
Il est possible d'utiliser cet événement du ThisWorkbook pour déclencher l'opération :
'---------------------
Private Sub Workbook_BeforePrint(Cancel As Boolean)
'Le code
End Sub
'----------------------
With Worksheets("Feuil1")
With .PageSetup
'Affiche la formule contenu dans la cellule A1
.LeftFooter = Feuil1.Range("A1").FormulaLocal
'Affiche le résultat de la cellule A1
.CenterFooter = Feuil1.Range("A1").Value
End With
.PrintPreview
End With
Salutations!
"François Marques" <a@b.fr> a écrit dans le message de news: 439d7896$0$18322$8fcfb975@news.wanadoo.fr...
Bonjour,
A l'attention des experts d'excel, existe-t-il un moyen de faire référence
au contenu d'une cellule dans les en-tête ou les pieds de page, et plus
généralement, peut-on y employer des formules ?
Il est possible d'afficher une formule ou son résultat au moment de l'impression avec une macro.
Il est possible d'utiliser cet événement du ThisWorkbook pour déclencher l'opération : '--------------------- Private Sub Workbook_BeforePrint(Cancel As Boolean) 'Le code End Sub '----------------------
With Worksheets("Feuil1") With .PageSetup 'Affiche la formule contenu dans la cellule A1 .LeftFooter = Feuil1.Range("A1").FormulaLocal 'Affiche le résultat de la cellule A1 .CenterFooter = Feuil1.Range("A1").Value End With .PrintPreview End With
Salutations!
"François Marques" a écrit dans le message de news: 439d7896$0$18322$ Bonjour, A l'attention des experts d'excel, existe-t-il un moyen de faire référence au contenu d'une cellule dans les en-tête ou les pieds de page, et plus généralement, peut-on y employer des formules ?
