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 :

Requête dans VBA avec between


Sujet :

VBA Access

Vue hybride

Message précédent Message précédent   Message suivant Message suivant
  1. #1
    Membre confirmé
    Inscrit en
    Juillet 2007
    Messages
    75
    Détails du profil
    Informations forums :
    Inscription : Juillet 2007
    Messages : 75
    Par défaut Requête dans VBA avec between
    Bonjour je souhaiterais à la fin de la création d'un formulaire regarder dans quelle période comptable donc j'avai pensé faire la requête suivante :

    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    Periode = DoCmd.RunSQL("SELECT Périodes.Période FROM Périodes WHERE " & txtFinSeq.Value & " BETWEEN [Date Heure Début] And [Date Heure Fin]")
    Mais on ne peut pas enregistrer cela dans la varible c'est sa ?
    Merci de m'aider au plus vite
    Adrien

  2. #2
    Invité
    Invité(e)
    Par défaut
    Bonjour

    RunSql ne sert qu'à exécuter une requête action (DELETE, INSERT, ...) et pas une requête de sélection.

    De plus tu ne peux affecter comme cela une chaine SQL à une variable ou un contrôle.

    Si tu es sûr que ta requête sélectionne ne doit te retourner qu'une valeur, utilise DLookup, je te renvoie sur pour la syntaxe, et une recherche sur le forum car les exemples sont nombreux.

    Starec

  3. #3
    Membre confirmé
    Inscrit en
    Juillet 2007
    Messages
    75
    Détails du profil
    Informations forums :
    Inscription : Juillet 2007
    Messages : 75
    Par défaut Déjà sur Dlookup
    En fait en attendant que tu réponde j'essayais DLOOKUP seulement on ne peut pas utiliser between donc j'ai essaye avec la syntaxe suivante mais il me met une erreur dans l'expression tu critère regarde :

    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    Dim TEST
    TEST = DLookup("Période", "Périodes", "[Date Heure Début] > '" & txtFinSeq.Value & "' And [Date Heure Fin] < '" & txtFinSeq.Value & "'")
    MsgBox TEST
    En fait je veux voir pour le moment si il me met bien la période comptable c'est pour sa que je l'ai mi sur un msgbox.
    Merci
    Adrien

  4. #4
    Invité
    Invité(e)
    Par défaut
    Bonjour

    Si tes champs date sont bien au format Date, il faut remplacer les ' par des #.

    Starec

  5. #5
    Membre confirmé
    Inscrit en
    Juillet 2007
    Messages
    75
    Détails du profil
    Informations forums :
    Inscription : Juillet 2007
    Messages : 75
    Par défaut Nikel !
    Il a fallut que j'inverse les < et >, j'ai mis les # et ça marche merci beaucoup !

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

Discussions similaires

  1. [AC-2007] Agregation requete SQL dans VBA avec combobox
    Par kimai dans le forum VBA Access
    Réponses: 5
    Dernier message: 22/03/2011, 04h23
  2. [AC-2003] creer une requête en VBA avec des variables
    Par qung88 dans le forum VBA Access
    Réponses: 14
    Dernier message: 23/02/2011, 15h19
  3. [XL-2010] Fonction Chr() dans VBA avec Excel 2010
    Par Frenchie_lol dans le forum Macros et VBA Excel
    Réponses: 5
    Dernier message: 20/06/2010, 22h20
  4. Réponses: 4
    Dernier message: 17/02/2007, 15h11
  5. Affichage d'un résultat selon requête dans formulaire avec date
    Par SMPGSARL dans le forum Requêtes et SQL.
    Réponses: 10
    Dernier message: 06/07/2006, 14h52

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