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

Macros et VBA Excel Discussion :

SQL grâce à vba


Sujet :

Macros et VBA Excel

Vue hybride

Message précédent Message précédent   Message suivant Message suivant
  1. #1
    Membre éclairé
    Profil pro
    Inscrit en
    Janvier 2012
    Messages
    233
    Détails du profil
    Informations personnelles :
    Localisation : France

    Informations forums :
    Inscription : Janvier 2012
    Messages : 233
    Par défaut SQL grâce à vba
    Bonjour,

    J'ai crée une connection Db_data et un recordset appelé Ado_data.

    Le bout de code suivant fonctionne:
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    Ado_data.ActiveConnection = Db_data
        Ado_data.Source = "SELECT * FROM Employee.csv"
        Ado_data.Open
    mais pas celui là dans lequel j'ajoute une condition
    WHERE
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    Ado_data.ActiveConnection = Db_data
        Ado_data.Source = "SELECT * FROM Employee.csv WHERE [Employee.csv].[Id]"
        Ado_data.Open
    Pourquoi?

    Merci d'avance pour tous vos conseils!

  2. #2
    Rédacteur/Modérateur

    Avatar de Jean-Philippe André
    Homme Profil pro
    Architecte Power Platform, ex-Développeur VBA/C#/VB.Net
    Inscrit en
    Juillet 2007
    Messages
    14 682
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 41
    Localisation : Canada

    Informations professionnelles :
    Activité : Architecte Power Platform, ex-Développeur VBA/C#/VB.Net
    Secteur : Finance

    Informations forums :
    Inscription : Juillet 2007
    Messages : 14 682
    Par défaut
    Salut,
    pour que ta clause where fonctionne, clause qui sert à effectuer un filtre sur les enregistrements initiaux, tu dois fournir la valeur du filtre que tu souhaites appliquer

    Ici tu dois mettre par exemple
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    Ado_data.Source = "SELECT * FROM Employee.csv WHERE [Employee.csv].[Id]>3"
    Cycle de vie d'un bon programme :
    1/ ça fonctionne 2/ ça s'optimise 3/ ça se refactorise

    Pas de question technique par MP, je ne réponds pas

    Mes ouvrages :
    Migrer les applications VBA Access et VBA Excel vers la Power Platform
    Apprendre à programmer avec Access 2016, Access 2019 et 2021

    Apprendre à programmer avec VBA Excel
    Prise en main de Dynamics 365 Business Central

    Coffrets disponibles de mes ouvrages : https://www.editions-eni.fr/jean-philippe-andre
    Pensez à consulter la FAQ Excel et la FAQ Access

    Derniers tutos
    Excel et les paramètres régionaux
    Les fichiers Excel binaires : xlsb,

    Autres tutos

  3. #3
    Membre éclairé
    Profil pro
    Inscrit en
    Janvier 2012
    Messages
    233
    Détails du profil
    Informations personnelles :
    Localisation : France

    Informations forums :
    Inscription : Janvier 2012
    Messages : 233
    Par défaut
    Salut jpcheck

    Merci pour ta réponse!!! Je comprends ton conseil mais cela ne fonctionne quand même pas...

    L'erreur est à
    Ado-data.Open
    et elle indique
    is not a valid name

  4. #4
    Membre éclairé
    Profil pro
    Inscrit en
    Janvier 2012
    Messages
    233
    Détails du profil
    Informations personnelles :
    Localisation : France

    Informations forums :
    Inscription : Janvier 2012
    Messages : 233
    Par défaut
    Aussi,

    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    Ado_data.ActiveConnection = Db_data
        Ado_data.Source = "SELECT * FROM Employee.csv WHERE [Name;Id;Dept]='Tom;1;Trading'"
        Ado_data.Open
    fonctionne...

    Donc le problème vient peut-être du fait qu'il ne prend pas la séparation des colonnes en compte...
    Tu sais comment je pourrais régler ce problème svp?

Discussions similaires

  1. Sql ou vba recherche
    Par stargates dans le forum VBA Access
    Réponses: 6
    Dernier message: 09/02/2006, 19h54
  2. [SQL] vs [VBA] comparaison de tables et mise à jour
    Par borisa dans le forum VBA Access
    Réponses: 4
    Dernier message: 09/02/2006, 10h15
  3. Conversion d'une requête SQL en VBA
    Par Keraccess dans le forum Requêtes et SQL.
    Réponses: 5
    Dernier message: 26/10/2004, 17h33
  4. [SQL][MACRO VBA]Pb de syntaxe
    Par Stef.proxi dans le forum Langage SQL
    Réponses: 2
    Dernier message: 11/08/2004, 09h11
  5. [Requete SQL en VBA] Problème avec la fonction FLOOR
    Par zubral dans le forum Langage SQL
    Réponses: 4
    Dernier message: 13/07/2004, 13h24

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