Logo GNT
Actualités Tests & Guides Bons Plans
GTA 6 iPhone 17 Copilot Switch 2 Temu ChatGPT Tesla
OVH Cloud OVH Cloud
Entraide Applications Microsoft Office Excel date en pied de page

date en pied de page

6 réponses
Avatar
gilles
bonjour à tous,
je souhaite mettre en pied de page une date inscrite dans une cellule.
pb: la date s'inscrit en valeur numérique
j'ai voulu ajouter ce code après mais sans résultat:
Selection.NumberFormat = "d/m/yy"
yaty kekun qui saurait quel code ajouter pour qu'il prenne le format qui va
bien.
maerci!
à+
gilles
en VBA aussi, ne remettons pas au lendemain ce qu'on peut faire aujourd'hui,
mais à chaque jour suffit sa peine...
Signaler un problème avec ce contenu

6 réponses

Supprimer
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
Avatar
Pierre Fauconnier
Bonjour

format(range("A1"),"dd/mm/yyyy")

Ok?


--
Pierre Fauconnier ()
Les sept laids tuent ( Lewis Carol )
Remplacez nospam.nospam par pfi.be pour répondre. Merci

"gilles" a écrit dans le message de
news:
bonjour à tous,
je souhaite mettre en pied de page une date inscrite dans une cellule.
pb: la date s'inscrit en valeur numérique
j'ai voulu ajouter ce code après mais sans résultat:
Selection.NumberFormat = "d/m/yy"
yaty kekun qui saurait quel code ajouter pour qu'il prenne le format qui
va

bien.
maerci!
à+
gilles
en VBA aussi, ne remettons pas au lendemain ce qu'on peut faire
aujourd'hui,

mais à chaque jour suffit sa peine...


Avatar
denis P
Sub ChangerLaDate()
Date=Range("madate")
MaDate = Format(Date, "dd" & " " & "mmmm" & " " & "yyyy")
ActiveSheet.PageSetup.CenterFooter = MaDate

End Sub

denis p.


"gilles" a écrit dans le message de
news:
bonjour à tous,
je souhaite mettre en pied de page une date inscrite dans une cellule.
pb: la date s'inscrit en valeur numérique
j'ai voulu ajouter ce code après mais sans résultat:
Selection.NumberFormat = "d/m/yy"
yaty kekun qui saurait quel code ajouter pour qu'il prenne le format qui
va

bien.
maerci!
à+
gilles
en VBA aussi, ne remettons pas au lendemain ce qu'on peut faire
aujourd'hui,

mais à chaque jour suffit sa peine...


Avatar
gilles
apparemment ça marche
Pierre et Denis MERCI beaucoup
à+
gilles

Sub ChangerLaDate()
Date=Range("madate")
MaDate = Format(Date, "dd" & " " & "mmmm" & " " & "yyyy")
ActiveSheet.PageSetup.CenterFooter = MaDate

End Sub

denis p.


"gilles" a écrit dans le message de
news:
bonjour à tous,
je souhaite mettre en pied de page une date inscrite dans une cellule.
pb: la date s'inscrit en valeur numérique
j'ai voulu ajouter ce code après mais sans résultat:
Selection.NumberFormat = "d/m/yy"
yaty kekun qui saurait quel code ajouter pour qu'il prenne le format qui
va

bien.
maerci!
à+
gilles
en VBA aussi, ne remettons pas au lendemain ce qu'on peut faire
aujourd'hui,

mais à chaque jour suffit sa peine...







Avatar
jps
et pas apparemment, ça fait quoi?
jps

"gilles" a écrit dans le message de
news:

apparemment ça marche
Pierre et Denis MERCI beaucoup
à+
gilles

Sub ChangerLaDate()
Date=Range("madate")
MaDate = Format(Date, "dd" & " " & "mmmm" & " " & "yyyy")
ActiveSheet.PageSetup.CenterFooter = MaDate

End Sub

denis p.


"gilles" a écrit dans le message de
news:
bonjour à tous,
je souhaite mettre en pied de page une date inscrite dans une cellule.
pb: la date s'inscrit en valeur numérique
j'ai voulu ajouter ce code après mais sans résultat:
Selection.NumberFormat = "d/m/yy"
yaty kekun qui saurait quel code ajouter pour qu'il prenne le format
qui



va
bien.
maerci!
à+
gilles
en VBA aussi, ne remettons pas au lendemain ce qu'on peut faire
aujourd'hui,

mais à chaque jour suffit sa peine...









Avatar
denis P
cela met un pied au c heuuu non un pied de Pâque heuuu non la date d'une
cellule en pied de page.
denis p.

"jps" a écrit dans le message de
news:
et pas apparemment, ça fait quoi?
jps

"gilles" a écrit dans le message de
news:

apparemment ça marche
Pierre et Denis MERCI beaucoup
à+
gilles

Sub ChangerLaDate()
Date=Range("madate")
MaDate = Format(Date, "dd" & " " & "mmmm" & " " & "yyyy")
ActiveSheet.PageSetup.CenterFooter = MaDate

End Sub

denis p.


"gilles" a écrit dans le message de
news:
bonjour à tous,
je souhaite mettre en pied de page une date inscrite dans une
cellule.




pb: la date s'inscrit en valeur numérique
j'ai voulu ajouter ce code après mais sans résultat:
Selection.NumberFormat = "d/m/yy"
yaty kekun qui saurait quel code ajouter pour qu'il prenne le format
qui



va
bien.
maerci!
à+
gilles
en VBA aussi, ne remettons pas au lendemain ce qu'on peut faire
aujourd'hui,

mais à chaque jour suffit sa peine...












Avatar
jps
:-)))))
jps

"denis P" a écrit dans le message de
news:OFsHY%
cela met un pied au c heuuu non un pied de Pâque heuuu non la date d'une
cellule en pied de page.
denis p.

"jps" a écrit dans le message de
news:
et pas apparemment, ça fait quoi?
jps