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 :

[vba access] Syntaxe avec openrecordset


Sujet :

VBA Access

Vue hybride

Message précédent Message précédent   Message suivant Message suivant
  1. #1
    Futur Membre du Club
    Profil pro
    Inscrit en
    Juillet 2007
    Messages
    3
    Détails du profil
    Informations personnelles :
    Localisation : France

    Informations forums :
    Inscription : Juillet 2007
    Messages : 3
    Par défaut [vba access] Syntaxe avec openrecordset
    Bonjour,

    je souhaite récupérer certaines données d'une table dans un code en vba. Pour cela j'utilise openrecordset mais j'ai des problèmes dans la syntaxe pour arriver à filtrer les informations qui me seront nécessaires.

    Je voudrais avoir dans infos uniquement les actions dont le type est le type choisi (dans une liste déroulante) et dont l'année est l'année choisie (dans une liste déroulante aussi)

    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
     
    Dim db As DAO.Database
    Set db = CurrentDb
     
    Set infos = db.OpenRecordset("select * from Actions where Actions.Type = " & """" & [Forms]![Menu]!type & """" And "Format(ActionsCorrectives.date, "yyyy") =" & """" [Forms]![Menu]!AnneeChoisie & """" )
    mais ce code donne une erreur 424 objet requis..

    pouvez vous me dire ce qui cloche?

    merci

  2. #2
    Expert confirmé
    Avatar de cafeine
    Inscrit en
    Juin 2002
    Messages
    3 904
    Détails du profil
    Informations forums :
    Inscription : Juin 2002
    Messages : 3 904
    Par défaut
    Hello,

    un debug.print s'impose

    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    Debug.print "select * from Actions where Actions.Type = " & """" & [Forms]![Menu]!type & """" And "Format(ActionsCorrectives.date, "yyyy") =" & """" [Forms]![Menu]!AnneeChoisie & """"
    tu verras ainsi le SQL généré et ton And est sorti de ta chaine SQL ...

  3. #3
    Futur Membre du Club
    Profil pro
    Inscrit en
    Juillet 2007
    Messages
    3
    Détails du profil
    Informations personnelles :
    Localisation : France

    Informations forums :
    Inscription : Juillet 2007
    Messages : 3
    Par défaut
    le debug.print me donne ça:

    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    Select * From Actions Where Actions.Type = "interne And Format(Actions.Date,"yyyy" ) ="2007"
    mais je ne sais pas l'interprêter.. si quelqu'un pouvait m'aider.
    merci

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

    Il ne manquerait pas dés fois une " avant ton And dans ta chaine SQL ?

    Starec

Discussions similaires

  1. VBA access - acImport avec un fichier .csv
    Par Super Fanja dans le forum Access
    Réponses: 2
    Dernier message: 13/12/2013, 08h39
  2. VBA ACCESS probleme avec une boucle for
    Par maldini dans le forum VBA Access
    Réponses: 2
    Dernier message: 20/04/2010, 09h52
  3. [vba-access] probleme avec word.application
    Par realthunderbolt dans le forum Access
    Réponses: 3
    Dernier message: 23/08/2006, 19h02
  4. Réponses: 1
    Dernier message: 23/07/2006, 22h15
  5. [ACCESS] Syntaxe SQL dans un TQuery avec Requestlive=True
    Par Unusual_FL dans le forum Bases de données
    Réponses: 2
    Dernier message: 28/06/2005, 10h51

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