OVH Cloud OVH Cloud

Format de date

3 réponses
Avatar
John Fuss
Bonjour je travail à partir d'un fichier ascii, je récupère dess champs date
(yyyymmdd) qu'Access ne veut pas Importer en tant que tel. J'aimerai
afficher les dates dans un format plus lisible pour les utilisateurs.
Comment puis-je faire ? Je précise que l'affichage ne m'importe que dans des
formulaires, peut-être à terme dans des états.

J'ai essayé de faire un champ calculé en y mettant
Format(CDate(monChampDate), "dd/mm/yyyy") mais je m'en sors pas !!!!!!

Merci bcp

John

3 réponses

Avatar
Raymond [mvp]
Bonjour.

Passe par dateserial pour recréer une date.
monchampcalcule = DateSerial(Left(champdate, 4), Mid(champdate, 5, 2),
Mid(champdate, 7, 2))

exemple:
Dim T As String
T = "20031209"
MsgBox DateSerial(Left(T, 4), Mid(T, 5, 2), Mid(T, 7, 2))

le msgbox affichera 09/12/2003
--
@+
Raymond Access MVP
http://access.seneque.free.fr/
http://access2003.free.fr/
http://users.skynet.be/mpfa/ pour une meilleure
efficacité de tes interventions sur MPFA


"John Fuss" a écrit dans le message de
news:br4eu3$2h5$
Bonjour je travail à partir d'un fichier ascii, je récupère dess champs
date

(yyyymmdd) qu'Access ne veut pas Importer en tant que tel. J'aimerai
afficher les dates dans un format plus lisible pour les utilisateurs.
Comment puis-je faire ? Je précise que l'affichage ne m'importe que dans
des

formulaires, peut-être à terme dans des états.

J'ai essayé de faire un champ calculé en y mettant
Format(CDate(monChampDate), "dd/mm/yyyy") mais je m'en sors pas !!!!!!

Merci bcp

John




Avatar
John Fuss
En fait c plus à l'intégration dans mes champs de formulaire que je bloque.
Je peux faire un champ calculé ? Faire du VBA ?

John

"Raymond [mvp]" a écrit dans le message de
news:eDTl%
Bonjour.

Passe par dateserial pour recréer une date.
monchampcalcule = DateSerial(Left(champdate, 4), Mid(champdate, 5, 2),
Mid(champdate, 7, 2))

exemple:
Dim T As String
T = "20031209"
MsgBox DateSerial(Left(T, 4), Mid(T, 5, 2), Mid(T, 7, 2))

le msgbox affichera 09/12/2003
--
@+
Raymond Access MVP
http://access.seneque.free.fr/
http://access2003.free.fr/
http://users.skynet.be/mpfa/ pour une meilleure
efficacité de tes interventions sur MPFA


"John Fuss" a écrit dans le message de
news:br4eu3$2h5$
Bonjour je travail à partir d'un fichier ascii, je récupère dess champs
date

(yyyymmdd) qu'Access ne veut pas Importer en tant que tel. J'aimerai
afficher les dates dans un format plus lisible pour les utilisateurs.
Comment puis-je faire ? Je précise que l'affichage ne m'importe que dans
des

formulaires, peut-être à terme dans des états.

J'ai essayé de faire un champ calculé en y mettant
Format(CDate(monChampDate), "dd/mm/yyyy") mais je m'en sors pas !!!!!!

Merci bcp

John








Avatar
Raymond [mvp]
Il serait préférable que tu ais un champ date dans ta table car tu peux
l'utiliser à ta convenance sans te poser de question ni faire de code et le
triturer à ta façon.
la valeur du champ devra être modifiée sous sa forme date mais tu pourras
l'utiliser en champ calculé sous toutes ses formes par la commande format
dans tes formulaires, vba et états.
--
@+
Raymond Access MVP
http://access.seneque.free.fr/
http://access2003.free.fr/
http://users.skynet.be/mpfa/ pour une meilleure
efficacité de tes interventions sur MPFA


"John Fuss" a écrit dans le message de
news:br4g4c$38e$
En fait c plus à l'intégration dans mes champs de formulaire que je
bloque.

Je peux faire un champ calculé ? Faire du VBA ?

John