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 :

Probleme de type de données VBA : Excel & Access avec num Autoto


Sujet :

Macros et VBA Excel

  1. #1
    Membre averti
    Femme Profil pro
    Étudiant
    Inscrit en
    Mai 2017
    Messages
    46
    Détails du profil
    Informations personnelles :
    Sexe : Femme
    Localisation : France, Isère (Rhône Alpes)

    Informations professionnelles :
    Activité : Étudiant

    Informations forums :
    Inscription : Mai 2017
    Messages : 46
    Par défaut Probleme de type de données VBA : Excel & Access avec num Autoto
    Bonjour à tous,

    Je viens chercher votre aide sur un sujet qui me bloque depuis plusieurs jours.
    Je fais une base Access avec une table dont les lignes sont des projets. Une façon de les distinguer sont l'ID qui est affecté automatiquement par Access. Je chercher ensuite en VBa à importer sur Excel toutes les informations relatives à un projet (nom, date, personne concernée....).

    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    6
     rs.Open "SELECT * FROM Temporary_Project_List " & _
                    " WHERE (ID = '" & Range("L4").Value & "')", _
                    cn, _
                    adOpenStatic, _
                    adLockOptimistic, _
                    adCmdText
    Mais j'ai l'erreur suivante : Data type dismatch in criteria expression

    Question ; dans mon fichier excel sous quel format doit être l'ID rentré puisque "général" ou "number" ne permet pas d'associer à une ligne de la table Access qui a un ID "num auto"?

    Merci d'avance pour votre aide,

    Rose

  2. #2
    Expert confirmé
    Homme Profil pro
    aucune
    Inscrit en
    Avril 2016
    Messages
    7 563
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 84
    Localisation : France, Pyrénées Atlantiques (Aquitaine)

    Informations professionnelles :
    Activité : aucune

    Informations forums :
    Inscription : Avril 2016
    Messages : 7 563
    Par défaut
    Bonjour
    Les critères de champ de type numérique doivent être utilisés tels quels (non encadrés de guillemets) dans une requête ...

  3. #3
    Membre averti
    Femme Profil pro
    Étudiant
    Inscrit en
    Mai 2017
    Messages
    46
    Détails du profil
    Informations personnelles :
    Sexe : Femme
    Localisation : France, Isère (Rhône Alpes)

    Informations professionnelles :
    Activité : Étudiant

    Informations forums :
    Inscription : Mai 2017
    Messages : 46
    Par défaut
    Merci pour votre réponse, et très bonne année.

    Comment dois-je enlever les guillemets? car cela ne semble pas marcher :
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    WHERE ('"ID =  Range("L4").Value'"), _
    ou
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
      "WHERE ('"ID =  Range("L4").Value'")", _
    "WHERE (ID = Range("L4").Value)", _

    Rien de tout cela ne marche;
    Merci d'avance pour votre aide.

  4. #4
    Invité
    Invité(e)
    Par défaut
    Bonjour,
    Or/And pas de virgule dans le where!
    "WHERE ID =" & Range("L4").Value & " And [date]=Date"

  5. #5
    Membre averti
    Femme Profil pro
    Étudiant
    Inscrit en
    Mai 2017
    Messages
    46
    Détails du profil
    Informations personnelles :
    Sexe : Femme
    Localisation : France, Isère (Rhône Alpes)

    Informations professionnelles :
    Activité : Étudiant

    Informations forums :
    Inscription : Mai 2017
    Messages : 46
    Par défaut
    Merci beaucoup pour la réponse.
    Si je n'ai qu'un paramètre, à savoir l'ID, comment écrire, (je ne souhaite pas mettre un deuxième paramètre comme date)?

  6. #6
    Invité
    Invité(e)
    Par défaut
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    "WHERE ID =" & Range("L4").Value & ";"

  7. #7
    Membre averti
    Femme Profil pro
    Étudiant
    Inscrit en
    Mai 2017
    Messages
    46
    Détails du profil
    Informations personnelles :
    Sexe : Femme
    Localisation : France, Isère (Rhône Alpes)

    Informations professionnelles :
    Activité : Étudiant

    Informations forums :
    Inscription : Mai 2017
    Messages : 46
    Par défaut
    Merci beaucoup, j'avais également trouvé une autre façon de faire ce que je voulais.
    Merci pour votre aide!

    Petite question annexe : plusieurs personnes peuvent en même temps utiliser le fichier excel et ajouter des données sur Access via les macros ?

    Bonne journée,

  8. #8
    Invité
    Invité(e)
    Par défaut
    Bonjour,
    oui mais il faut définir ton fichier Excel comme fichier partagé!

Discussions similaires

  1. [AC-2007] Accès au données et Adaptation VBA excel/access
    Par kennes dans le forum VBA Access
    Réponses: 2
    Dernier message: 31/07/2012, 15h31
  2. [VBA EXCEL / ACCESS] : Resultat d'une requete
    Par forsay1 dans le forum Macros et VBA Excel
    Réponses: 9
    Dernier message: 17/07/2009, 12h00
  3. Réponses: 1
    Dernier message: 23/07/2006, 22h15
  4. [VBA Excel] Tableau avec données du userform et de formules
    Par Viper7 dans le forum Macros et VBA Excel
    Réponses: 2
    Dernier message: 28/06/2006, 13h29
  5. Importation de donnée de Excel à Access
    Par virtuose dans le forum Access
    Réponses: 3
    Dernier message: 02/02/2006, 12h32

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