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 06/12/2011, 11h35   #1
Membre du Club
 
Inscription : juillet 2005
Messages : 275
Détails du profil
Informations forums :
Inscription : juillet 2005
Messages : 275
Points : 58
Points : 58
Par défaut Requete paramétrée entre dates

Bonjour,

Je viens vers vous pour un problème de requête paramétrée et pour des raisons pratiques, je dois passer par une requête enregistrée. Pour ça je me suis basé sur ce tuto. J’aimerai que celle-ci me renvoie les valeurs comprises entre 2 dates.

Problème, je ne vois pas comment passer ce paramètre (c’est pour illustrer, Parameters attend une date et en l’état, c’est une chaîne de caractères !!!) :

Code :
.Parameters("MonChampDate").Value = "Between " & "#" & MaDate1 & "#"" And " & "#" & MaDate2 & "#"""
Si vous pouviez m’éclairer …
__________________
Merci de votre aide
kgb1917 est déconnecté   Envoyer un message privé Réponse avec citation 00
Vieux 07/12/2011, 16h54   #2
Membre confirmé
 
Inscription : juillet 2006
Messages : 347
Détails du profil
Informations forums :
Inscription : juillet 2006
Messages : 347
Points : 289
Points : 289
Bonjour,

Dejà je pense que vous avez un problème au niveaux des doubles quotes, vous en mettez trop :

Code :
.Parameters("MonChampDate").Value = "Between #" & MaDate1 & "# And #" & MaDate2 & "#"
D'autre part, si vous pensez avoir un problème au niveau du format de date, vous pouvez utiliser la fonction dateserial (je vous laisse regarder l'aide de cette fonction).
Access Newbie est actuellement connecté   Envoyer un message privé Réponse avec citation 00
Vieux 08/12/2011, 11h23   #3
Membre du Club
 
Inscription : juillet 2005
Messages : 275
Détails du profil
Informations forums :
Inscription : juillet 2005
Messages : 275
Points : 58
Points : 58
Bonjour,

d'abord, merci de me répondre.

Je regarde du côté de DateSerial et reviens vous dire quoi
__________________
Merci de votre aide
kgb1917 est déconnecté   Envoyer un message privé Réponse avec citation 00
Vieux 14/12/2011, 21h13   #4
Membre du Club
 
Inscription : juillet 2005
Messages : 275
Détails du profil
Informations forums :
Inscription : juillet 2005
Messages : 275
Points : 58
Points : 58
Bonsoir,

bonne piste, ça marche
__________________
Merci de votre aide
kgb1917 est déconnecté   Envoyer un message privé Réponse avec citation 00
Vieux 16/12/2011, 12h49   #5
Invité de passage
 
Inscription : février 2005
Messages : 3
Détails du profil
Informations forums :
Inscription : février 2005
Messages : 3
Points : 3
Points : 3
Bonsoir,
Personnellement, pour ne pas m'embêter avec les requêtes paramétrées, j'utilise la méthode suivante :
Dans un module :
Code :
1
2
3
4
5
6
7
8
9
10
public ddeb as date
public dfin as date
 
public function getddeb()
getddeb=ddeb
end function
 
public function getdfin()
getdfin=dfin
end function
si tu as une requête enregistrée tu mets comme critère dans ta date :
>=getddeb() et <=getdfin()

il suffit avant d'appeler ta requête de renseigner les deux variables ddeb et dfin :
Code :
1
2
3
ddeb=<ma date début>
dfin=<ma date fin>
docmd.openquery "ma requête"
si tu veux écrire directement le code de la requête : (par exemple)
Code :
me.RecordSource="select * from ma_table where ma_date>=getddeb() and ma_date>=getdfin()"
Voilà cette méthode, qui ne plaît pas forcément à tous les puristes (utilisation des variables globales), est très efficace et s'utilise avec tous les types de variables (attention néammoins de bien typer les variables publiques).
rdautin est déconnecté   Envoyer un message privé Réponse avec citation 00
Réponse Proposer ce sujet en actualité Cette discussion est résolue.
Outils de la discussion



Fuseau horaire GMT +2. Il est actuellement 15h47.


 
 
 
 
Partenaires

Hébergement Web