IdentifiantMot de passe
Loading...
Mot de passe oublié ?Je m'inscris ! (gratuit)
Navigation

Inscrivez-vous gratuitement
pour pouvoir participer, suivre les réponses en temps réel, voter pour les messages, poser vos propres questions et recevoir la newsletter

VBA Access Discussion :

Comment utiliser une requête paramétrée avec deux zones de texte dans un formulaire ? [AC-2003]


Sujet :

VBA Access

  1. #1
    Membre averti
    Homme Profil pro
    Paramétreur de progiciels
    Inscrit en
    Octobre 2006
    Messages
    970
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : France, Pas de Calais (Nord Pas de Calais)

    Informations professionnelles :
    Activité : Paramétreur de progiciels

    Informations forums :
    Inscription : Octobre 2006
    Messages : 970
    Points : 381
    Points
    381
    Par défaut Comment utiliser une requête paramétrée avec deux zones de texte dans un formulaire ?
    Bonjour,

    J'exécute une requête qui utilise une requête paramétrée comme ceci :
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
     
    Dim MaTable As DAO.Recordset
    Set MaTable = CurrentDb.OpenRecordset("qry_nombre_d_observations_par_categorie")
    J'ai l'erreur suivante quand je l'exécute :



    Alors que la formulaire est ouvert et les données renseignées, voici le critère :
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    Entre [Formulaires]![frm_statistiques_configuration]![txtDateDebut] Et [Formulaires]![frm_statistiques_configuration]![txtDateFin]
    Si je l'exécute en dehors de VBA, donc manuellement, ça fonctionne...

    Savez-vous comment je dois faire pour utiliser une requête paramétrée dans du code VBA, pourquoi ne prend-il pas en compte les valeurs de mes zones de texte ?

    Merci,
    ZiP

  2. #2
    Membre averti
    Homme Profil pro
    Paramétreur de progiciels
    Inscrit en
    Octobre 2006
    Messages
    970
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : France, Pas de Calais (Nord Pas de Calais)

    Informations professionnelles :
    Activité : Paramétreur de progiciels

    Informations forums :
    Inscription : Octobre 2006
    Messages : 970
    Points : 381
    Points
    381
    Par défaut
    Bonjour,

    Je ne sais pas si c'est la meilleure des solutions, mais j'ai réussi en faisant comme ça :
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    6
    7
    8
    9
    10
    11
    12
    13
    14
    15
    16
    17
    18
     
        Dim Qry As DAO.QueryDef
        Dim Rs As DAO.Recordset
     
        Set Qry = CurrentDb.QueryDefs("qry_nombre_d_observations_par_categorie")
        Qry.Parameters(0) = Form_frm_statistiques_configuration.txtDateDebut.Value
        Qry.Parameters(1) = Form_frm_statistiques_configuration.txtDateFin.Value
        Set Rs = Qry.OpenRecordset
        For i = 0 To Rs.Fields.Count - 1
     
        Next i
        While Not Rs.EOF
     
            Rs.MoveNext
        Wend
     
        Set Qry = Nothing
        Set Rs = Nothing
    Cordialement,
    ZiP

+ Répondre à la discussion
Cette discussion est résolue.

Discussions similaires

  1. Réponses: 3
    Dernier message: 27/01/2010, 15h29
  2. Réponses: 3
    Dernier message: 16/12/2006, 13h59
  3. Réponses: 7
    Dernier message: 11/10/2006, 14h35
  4. Déterminer une requête paramétrée avec LIKE
    Par priest69 dans le forum Access
    Réponses: 4
    Dernier message: 24/10/2005, 20h29
  5. [ADO.Net][C#/Oracle] Comment utiliser une requête paramètrée ?
    Par kaboume dans le forum Accès aux données
    Réponses: 4
    Dernier message: 05/07/2005, 15h50

Partager

Partager
  • Envoyer la discussion sur Viadeo
  • Envoyer la discussion sur Twitter
  • Envoyer la discussion sur Google
  • Envoyer la discussion sur Facebook
  • Envoyer la discussion sur Digg
  • Envoyer la discussion sur Delicious
  • Envoyer la discussion sur MySpace
  • Envoyer la discussion sur Yahoo