Total page en pied de page avec excel 2013

JCGL

XLDnaute Barbatruc

• 5 Août 2014

• #2

Re : Total page en pied de page avec excel 2013

Bonjour à tous,

Bienvenus sur XLD

Le plus simple : tu fais la somme souhaitée en D1 par exemple et :

ActiveSheet.PageSetup.RightFooter = Cells(1, 4)

Cliquez pour agrandir...

A+ à tous

 

Vote positif 0 Vote négatif

X

Xwprft

XLDnaute Junior

• 5 Août 2014

• #3

Re : Total page en pied de page avec excel 2013

Bonsoir guydo et bienvenue sur le forum,

Tu auras plus de réponses si tu fournis un fichier pour nous aider à comprendre.
Qu'est-ce que c'est "le pied de chaque page à droite" ?

A+
Edit: Bonsoir JCGL
J'avais pas pensé au pied de page !

 

Vote positif 0 Vote négatif

G

guydo

XLDnaute Nouveau

• 6 Août 2014

• #4

Re : Total page en pied de page avec excel 2013

Merci JCGL,

J'ai fait la somme en D1. J'ai placé le code ci-après dans "ThisWorkbook".

Private Sub Workbook_BeforePrint(Cancel As Boolean)
ActiveSheet.PageSetup.RightFooter = Cells(1, 4)
End Sub

Cliquez pour agrandir...

1. Etrangement, rien n'apparaît en pied de page de mon preview.
2. De plus, la feuille peut comporter 2000 lignes. Avec la solution proposée, c'est toujours le même montant qui apparaîtrait en pied de page et non le total par page me semble-t-il.

Qu'en penses-tu?

 

Vote positif 0 Vote négatif

chris

XLDnaute Barbatruc

• 6 Août 2014

• #5

Re : Total page en pied de page avec excel 2013

Bonjour
Bise à JCGL 😉

guydo à dit:

Bonjour,
Je souhaiterais afficher le total de la colonne F (à partir de F9) dans le pied de chaque page à droite. Est-ce que cela fonctionne toujours avec excel 2013. Tout ce que j'ai essayé jusqu'ici ne semble pas fonctionner et ce depuis excel 2010.
Merci de votre aide.
G

Cliquez pour agrandir...

Cela n'a jamais fonctionné de façon automatique quelle que soit le version.
Ne confonds-tu pas avec les états ACCESS où cela peut être fait assez simplement ?

Comme indiqué par Xwprft, sans exemple comment savoir que tu as n pages et ta demande ("le total de la colonne F") ne précisait pas tu veux une totalisation dynamique au fil des pages...

 

Vote positif 0 Vote négatif

G

guydo

XLDnaute Nouveau

• 6 Août 2014

• #6

Re : Total page en pied de page avec excel 2013

Bonsoir,
Je n'ai peut-être pas été assez clair dans ma demande.
Au bas de chaque page (càd en pied de page), je souhaite obtenir le total (de la colonne F et ce en démarrant à F9) de la page concernée (Une feuille peut contenir plusieurs pages dont le nombre ne peut pas être précisé à l'avance). Il s'agit donc d'un calcul dynamique qui change de page en page.
Voici une feuille exemple avec le code.
Merci de votre aimable examen.

 

Pièces jointes

• TestSum.xlsm

  15 KB · Affichages: 49

Vote positif 0 Vote négatif

G

guydo

XLDnaute Nouveau

• 10 Août 2014

• #7

Re : Total page en pied de page avec excel 2013

Bonsoir,
Quelqu'un a-t-il la réponse à ma demande?
Merci.

 

Vote positif 0 Vote négatif

DoubleZero

XLDnaute Barbatruc

• 11 Août 2014

• #8

Re : Total page en pied de page avec excel 2013

Bonjour à toutes et à tous, bises à chris 😀 et JCGL 😀,

Un essai avec ces quelques lignes, placées dans le code de l'onglet "TOT Print" :

Code:

Option Explicit
Private Sub Worksheet_Change(ByVal Target As Range)
PageSetup.RightFooter = Application.WorksheetFunction.Sum(Range("f9:f65000"))
End Sub

A bientôt 🙂

 

Vote positif 0 Vote négatif

G

guydo

XLDnaute Nouveau

• 11 Août 2014

• #9

Re : Total page en pied de page avec excel 2013

Bonjour DoubleZero,
Le total s'affiche bien en pied de page. Cependant, il s'agit du total général et non du total par page.
Vois-tu une possibilité?
Merci.

 

Vote positif 0 Vote négatif

DoubleZero

XLDnaute Barbatruc

• 11 Août 2014

• #10

Re : Total page en pied de page avec excel 2013

Re-bonjour,

guydo à dit:

... il s'agit du total général et non du total par page. Vois-tu une possibilité?...

Cliquez pour agrandir...

A présent, j'ai compris le besoin 😱 et il y a certainement une solution que je ne sais 😕 trouver.

A bientôt 🙂

 

Vote positif 0 Vote négatif

chris

XLDnaute Barbatruc

• 11 Août 2014

• #11

Re : Total page en pied de page avec excel 2013

Bonjour
Coucou 00😉

Comme je le disais au post #5 autant c'est simple dans Access voire même dans Word, autant c'est tordu à faire en Excel.
Il faut rechercher où se feront les sauts de page, effectuer le calcul pour chaque page puis imprimer un enchaînement d'une page à la fois car on ne peut avoir de pied différent d'une page à l'autre (sauf si 3 pages maxi où on peut jouer avec 1ère page + paire/impaire).
Si on doit folioter il faut du coup le faire aussi par le code pour ne pas avoir que des pages 1.😡

Il serait plus simple d'avoir une colonne à droite (ou à gauche) des données où le code VBA inscrirait le total de la page après recherche des sauts de pages, et une impression standard ensuite...

Cherchant si 2013 n'aurait rien introduit de nouveau, j'ai trouvé ce fil qui semble-t-il traite du même sujet https://www.excel-downloads.com/threads/resolu-entete-dynamique.179917/

 

Dernière édition: 11 Août 2014

Vote positif 0 Vote négatif