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 SQL en VBA pour afficher tous les enregistrements


Sujet :

VBA Access

Vue hybride

Message précédent Message précédent   Message suivant Message suivant
  1. #1
    Membre averti
    Homme Profil pro
    A mon compte
    Inscrit en
    Décembre 2015
    Messages
    53
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 48
    Localisation : France, Loire Atlantique (Pays de la Loire)

    Informations professionnelles :
    Activité : A mon compte

    Informations forums :
    Inscription : Décembre 2015
    Messages : 53
    Par défaut Requête SQL en VBA pour afficher tous les enregistrements
    Bonjour a tous,

    Je coince la dessus, ma condition WHERE me cause une erreur

    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    "WHERE (((T_AGENCES.N°AGENCE)=IIf((UA()=' ALL '),Nz([T_AGENCES]![N°AGENCE]),UA())) AND ((T_SITE.N°)=US())) " & _
    Cette requête et la fonction Nz fonctionnent très bien dans le générateur de requête, mais pas dans le code VBA.

    Quand la variable UA() est égale a ALL, je souhaite afficher tous les enregistrements qui suivent la fonction Nz
    Quand UA() n'est pas égal à ALL, cela affiche les enregistrements liés à la variable UA(), mais ça, ca fonctionne au poil.

    Merci pour vos retours

  2. #2
    Expert éminent
    Avatar de tee_grandbois
    Homme Profil pro
    retraité
    Inscrit en
    Novembre 2004
    Messages
    8 962
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 68
    Localisation : France, Yvelines (Île de France)

    Informations professionnelles :
    Activité : retraité

    Informations forums :
    Inscription : Novembre 2004
    Messages : 8 962
    Par défaut
    bonsoir,
    Cette requête et la fonction Nz fonctionnent très bien dans le générateur de requête, mais pas dans le code VBA.
    y a t-il bien un espace à la fin de la ligne précédent le "WHERE "?
    peux-tu afficher le SQL du générateur de requêtes puisqu'il fonctionne ?
    La valeur retournée par UA() est-ce bien ' ALL ' et pas 'ALL' ?

    Merci d'afficher le code complet la prochaine fois, car ce n'est pas forcément sur cette ligne que se trouve l'erreur ...

  3. #3
    Membre averti
    Homme Profil pro
    A mon compte
    Inscrit en
    Décembre 2015
    Messages
    53
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 48
    Localisation : France, Loire Atlantique (Pays de la Loire)

    Informations professionnelles :
    Activité : A mon compte

    Informations forums :
    Inscription : Décembre 2015
    Messages : 53
    Par défaut
    Citation Envoyé par tee_grandbois Voir le message


    La valeur retournée par UA() est-ce bien ' ALL ' et pas 'ALL' ?

    Bonjour,

    Pfffff j'étais fatigué ce soir là. J'ai tourné viré pendant une heure la dessus

    Merci de m'avoir ouvert les yeux

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

Discussions similaires

  1. [AC-2007] Requête sql et vba pour afficher des commentaires
    Par BRUNO71 dans le forum Requêtes et SQL.
    Réponses: 1
    Dernier message: 11/04/2016, 20h29
  2. [AC-2003] Requête pour sortir tous les enregistrements modifés depuis une date
    Par piercleo dans le forum Requêtes et SQL.
    Réponses: 4
    Dernier message: 07/01/2010, 15h08
  3. [AC-2003] Critère requête VraiFaux() pour sélectionner tous les enregistrements
    Par lio33 dans le forum Requêtes et SQL.
    Réponses: 4
    Dernier message: 05/10/2009, 09h39
  4. [VBA]Boucle pour parcourir tous les enregistrements
    Par Paul Gasser dans le forum VBA Access
    Réponses: 44
    Dernier message: 28/03/2007, 10h22

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