Recuperer valeur liste Access Fermé

Question

Bonjour,


voila mon souci :

jai une table ou dedans j'ai un champ DATE/HEURE ou les valeur sont de la forme : 21/01/2008 16:10:00

exemple en photo :
http://images2.photomania.com/345332/1/rad156B6.jpg

Comment faire pour que dans un formulaire, comme ci dessous, ANNEE recupere l'année, ici 2008 puis sen selectionnant l'année ca met la valeur des mois, ici 01 & 02 puis en choississant soit 01 ou 02 ca affiche le jour et ainsi dessuite ??

http://images2.photomania.com/345332/1/rad4F87F.jpg


En fait je n'arrive pas a recuperer le resultat d'une liste


Merci de votre aide pour un noob sous access.

phil232 · Answer

format("yyyy", MyDateField)

puis (dans une combo, non ?)

Me.MyMonthCombo.RowSource = "SELECT Format("mm", MyDateField) FROM WhatDoIKnow WHERE Format("yyyy", MyDateField) = Me.MyYearCombo

etc...

noob · Answer

Merci d'avoir repondu Phil232, mais je debute avec access, je ne vais pas te demander de faire le travail lol mais juste de m'expliquer un petit peu plus si  vous le voulez bien, car là je suis un peu perdu avec l'histoire du combot !!


D'avance merci

tarek_dotzero · Answer

Salut,

Ce que Phil232 vous donne ici c'est un bout de code VBA, que vous devez l'aasocier à l'evenement de selection de votre combo année!
Donc si vous savez cela: ignorez la suite de ma reponse,
Sinon: Charchez une bonne introduction pour VBA pour un demarrage rapide.

Bon Chance!

tarek_dotzero · Answer

Voir:

Vba débutant

phil232 · Answer

une combo c'est une liste deroulante (beaucoup trop long ce mot donc une combo)

format("yyyy", MyDateField) formate und champ de type date de façon à ce que ça extrait seulement l'année en 4 chiffres (sinon "yy")

comme disait tarek_dotzero il faut ensuite "attacher" à un évenement (properties --> onglet events)

c'est soit OnClick soit OnChange (petite différence entre VB et VBA, je me souviens jamais). 

sub MyYearCombo_OnChange

Me.MyMonthCombo.RowSource = "SELECT Format("mm", MyDateField) FROM WhatDoIKnow WHERE Format("yyyy", MyDateField) = Me.MyYearCombo 

end sub


MyDateField = champs qui contient la date sous forme "1/01/2008 16:10:00"
Format("mm", MyDateField) = formatage de la date pour récuperer le mois en 2 chiffres. parfois "mmm" est mieux car on obtiens le mois abbrévié comme FEB, MAR, etc. ça peut etre important pour p.ex. les anglais/americains et d'autres.

REMARQUE : il n'est pas logique d'extraire des dates comme ça. comme tout le monde sais l'année est composée de 12 mois et un mois de 28 à 31 jours. au lieu d'interroger (et déranger) la bdd on peut toute de suite remplir les combos (sauf pour l'année, là ça depend si c'est mieux de hardcoder ou non)

noob · Answer

ok je comprends beaucoup mieux avec ces explications detaillées, je m'y remet dessuite et vous tiens au courant

merci !

noob · Answer

MODE je galere grave ON

si je t'envoie une parti de mon travail tu peux jeter un oeil ? car là je capte pas :(

phil232 · Answer

qu'y a-t-il ?

si c'est pas trop je peux. je ne peux pas downloader. donc ça doit être dans le commentaire de ce thread.

noob · Answer

Voici en image donc le "projet" :


http://images3.hiboox.com/images/0508/qwycrcc9.jpg


donc en faite jarrive bien à afficher l'année, mais je sais pas si c'est correct ou pas en fait, et j'aimerai qu'en cliquant sur "2008", il affiche les jours correspondant dans 'JOURS'

a savoir que me suis trompé 'MOIS' = année surla photo

noob · Answer

je sais pas quoi mettre en faite dans l'evennement de date et/ou Liste17 et dans le contenu de Liste 17.

J'ai peut etre les formules jsutes, mais surement mélangées

Recuperer valeur liste Access

10 réponses

Discussions similaires