Précédent   Forum des professionnels en informatique > Logiciels > Microsoft Office > Access > VBA Access
VBA Access Le forum pour les questions relatives au code VBA sous Access, et à son environnement de développement VBE.
Partagez cette discussion sur d'autres réseaux sociaux : Viadeo Twitter Google Facebook Digg Delicious MySpace Yahoo
Réponse Proposer ce sujet en actualité
 
Outils de la discussion
Publicité
'
Vieux 20/04/2011, 16h45   #1
Candidat au titre de Membre du Club
 
Roger
Inscription : mars 2007
Messages : 49
Détails du profil
Informations personnelles :
Nom : Roger

Informations forums :
Inscription : mars 2007
Messages : 49
Points : 13
Points : 13
Par défaut transformation d'une chaîne en date

Bonjour,
J'ai le plaisir de faire appel à l'équipe :-) .
J'ai un petit soucis. Dans un champ commmentaire (texte) je récupère une valeur formatée de la manière suivante mois/année ( ex : 09/2011). Cela devient une colonne dans une requête (j'utilise ma fonction qui va chercher cette info (qui est placée entre deux balises)

Je souhaite que cette chaîne soit reconnue comme une date :
; j'ai essayé CDate : CvDate !ça ne marche pas ; je m'y prends certainement très mal ... Auriez-vous une solution ou une piste de solution ? Merci d'avance,
Roger
rogerfon est déconnecté   Envoyer un message privé Réponse avec citation 00
Vieux 20/04/2011, 17h44   #2
Modérateur
 
Homme René MAROT
Inscription : octobre 2005
Messages : 5 462
Détails du profil
Informations personnelles :
Nom : Homme René MAROT
Localisation : Canada

Informations forums :
Inscription : octobre 2005
Messages : 5 462
Points : 7 539
Points : 7 539
CDate() ne marche que si tu as une date valide (ex : 31/12/2011).

Attention Access a parfois des problèmes avec les dates ambigues (ex : 01/02/2011, est-ce le 1er février 2011 ou le 02 janvier 2011 ?). Il est donc prudent dans ce cas de traiter à la main.

Dans ton cas ta date est incomplète mais le format est connu donc il faut faire ceci

Code :
1
2
 
DateSerial(right([TonChampDateIncomplet],4), left([TonChampDateIncomplet],2),1)
Ceci va te créer une date valide au 1er du mois pour l'année choisie.

Note que dans une requête Access va traduire DateSerial, Right et Left en français.

A+
__________________
Vous voulez une réponse rapide et efficace à vos questions téchniques ? Ne les posez pas en message privé mais dans le forum, vous bénéficiez ainsi de la compétence et de la disponibilité de tous les contributeurs.
marot_r est déconnecté   Envoyer un message privé Réponse avec citation 00
Vieux 20/04/2011, 22h02   #3
Candidat au titre de Membre du Club
 
Roger
Inscription : mars 2007
Messages : 49
Détails du profil
Informations personnelles :
Nom : Roger

Informations forums :
Inscription : mars 2007
Messages : 49
Points : 13
Points : 13
Par défaut merci beaucoup

Merci beaucoup de ta réponse Marot_r ; ton éclairage m'aide beaucoup, j'étais perdu ; je vais essayer cela dans la soirée et te ferai un retour ; excellente soirée ! Roger
rogerfon est déconnecté   Envoyer un message privé Réponse avec citation 00
Vieux 20/04/2011, 23h20   #4
Candidat au titre de Membre du Club
 
Roger
Inscription : mars 2007
Messages : 49
Détails du profil
Informations personnelles :
Nom : Roger

Informations forums :
Inscription : mars 2007
Messages : 49
Points : 13
Points : 13
Par défaut retour

Re bonsoir,
J'ai testé cela semble marcher ; cependant si je compare avec un 'vrai' champ date dans la requête, le tri (dans la feuille de résultat) me propose de trier comme une date (ex ; ce mois, le mois dernier etc.) dans le cas d'un "vrai " champ date et pas dans ce cas (considéré comme du texte. Qu'en pensez-vous ? Roger
rogerfon est déconnecté   Envoyer un message privé Réponse avec citation 00
Vieux 20/04/2011, 23h55   #5
Candidat au titre de Membre du Club
 
Roger
Inscription : mars 2007
Messages : 49
Détails du profil
Informations personnelles :
Nom : Roger

Informations forums :
Inscription : mars 2007
Messages : 49
Points : 13
Points : 13
Par défaut coup de théâtre

Bonsoir,
Tout cela m'a amené à découvrir par hasard que la fonction CDate fonctionne si elle est mise dans la requête (et non pas dans le vba) . Bref CDate(MaFonctionVBA(MonChampTraitéParMaFonctionVBA)
Encore un très très très grand merci à toi pour ton aide ;
Roger
rogerfon est déconnecté   Envoyer un message privé Réponse avec citation 00
Réponse Proposer ce sujet en actualité
Outils de la discussion



Fuseau horaire GMT +2. Il est actuellement 10h25.


 
 
 
 
Partenaires

Hébergement Web