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 Access Format date

Format date

2 réponses
Avatar
damien
Bonjour,
voila g une date dateCalculFin de la forme 01/11/2004 et je veux l'avoir de
la forme 200411 pour ca c ok
mais pour 01/02/2004 g 20042 et moi je voudrais 200402
le 0 n'apparait pas et ca c un probléme pour la suite de mon programme
Voila ce que g écrit: ca me semble correcte

Dim NBSem2 As Integer
Dim FreqFin As Double

NBSem2 = Int(Format(Format(DateCalculFin, "ww"), "00"))
FreqFin = CDbl(Mid(Trim(Str(DateCalculFin)), 7, 4) + Trim(Str(NBSem2)))

Que faire
Merci de votre aide (quotidienne)
Signaler un problème avec ce contenu

2 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
bubustor
salut
et avec des left et right ou mid ?

résultat = right(dateCalculFin,4) + mid(dateCalculFin,4,2)

enfin je crois que c'est ça.
Avatar
3stone
Salut,

"damien"
voila g une date dateCalculFin de la forme 01/11/2004 et je veux l'avoir de
la forme 200411 pour ca c ok
mais pour 01/02/2004 g 20042 et moi je voudrais 200402
le 0 n'apparait pas et ca c un probléme pour la suite de mon programme




Format(DateCalculFin,"yyyymm")



Voila ce que g écrit: ca me semble correcte

Dim NBSem2 As Integer
Dim FreqFin As Double

NBSem2 = Int(Format(Format(DateCalculFin, "ww"), "00"))
FreqFin = CDbl(Mid(Trim(Str(DateCalculFin)), 7, 4) + Trim(Str(NBSem2)))



?



--
A+
Pierre (3stone) Access MVP
~~~~~~~~~~~~~~~~~~~~~~~
http://users.skynet.be/mpfa
http://users.skynet.be/accesshome