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

Requêtes et SQL. Discussion :

Copier un enregistrement d'une table vers une autre avec case à cocher


Sujet :

Requêtes et SQL.

  1. #1
    Membre habitué
    Homme Profil pro
    Apprendre
    Inscrit en
    Avril 2012
    Messages
    147
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 47
    Localisation : Canada

    Informations professionnelles :
    Activité : Apprendre
    Secteur : Industrie

    Informations forums :
    Inscription : Avril 2012
    Messages : 147
    Points : 175
    Points
    175
    Par défaut Copier un enregistrement d'une table vers une autre avec case à cocher
    Bonjour,

    Voici mon problème.

    J'ai une table 'Tâches' avec un champ 'description', un champ 'responsable' (Liste de choix unique) et un champ 'ajouter' (Cas a cocher oui/non). La deuxième table s'appelle 'Tâches1' avec des champs identiques en nom et en format à la table 'Tâches'.

    J'ai créer un formulaire avec la table tâches. J'aimerais quand je coche la case ajouter sur plusieurs lignes, recopier les enregistrements dans la table Tâches1.

    Sur un bouton de commande, j'ai inscrit le code suivant:

    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    Docmd.RunSQL "INSERT INTO [tâches1] SELECT FROM [tâches] WHERE [tâches].[ajouter] = true"
    Ça ne fonctionne tout simplement pas...

    Quelqu'un peut m'aider a corriger ce code?

    Merci

  2. #2
    Rédacteur/Modérateur

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

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

    Informations forums :
    Inscription : Juillet 2007
    Messages : 14 598
    Points : 34 283
    Points
    34 283
    Par défaut
    salut,

    par habitude, il doit y avoir un ou plusieurs champs dans ta clause SELECT, à défaut un * .

    Le reste de la requête ne me parait pas foncièrement faux
    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 :
    Apprendre à programmer avec Access 2016, Access 2019 et 2021

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

    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 habitué
    Homme Profil pro
    Apprendre
    Inscrit en
    Avril 2012
    Messages
    147
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 47
    Localisation : Canada

    Informations professionnelles :
    Activité : Apprendre
    Secteur : Industrie

    Informations forums :
    Inscription : Avril 2012
    Messages : 147
    Points : 175
    Points
    175
    Par défaut
    Bonjour,

    Pour simplifier le cas, pour copier un enregistrement de la table1 vers une table2, avec 2 champs identiques en format (Champ1 et le champ2 qui est une case oui/non), j'aurais tendance a écrire, mais j'arrive toujours a la même erreur 449 (Argument non-facultatif):

    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    DoCmd.RunSQL = "INSERT INTO [table2] select [champ1, champ2] FROM [table1] WHERE [table1].[champ2] = true"
    Quelques éléments me chicotent:

    1- Est-ce la bonne manière de lister les champs? Par le fait même, dois-je lister tous les champs de la table?
    2- Dois-je déclarer une variable ou un format, soit pour la commande docmd.runsql ou ajouter un VALUE dans le SQL?
    3- Puis-je inscrire cette ligne directement dans le bouton de commande du formulaire ou dois-je créer une requête et l'appeler?

    Merci!

  4. #4
    Membre habitué
    Homme Profil pro
    Apprendre
    Inscrit en
    Avril 2012
    Messages
    147
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 47
    Localisation : Canada

    Informations professionnelles :
    Activité : Apprendre
    Secteur : Industrie

    Informations forums :
    Inscription : Avril 2012
    Messages : 147
    Points : 175
    Points
    175
    Par défaut
    Rebonjour,

    Je crois que j'ai répondu à l'ensemble de mes questions. Après quelques recherches, j'arrive à un code fonctionnel.

    Je passe donc de:

    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    DoCmd.RunSQL = "INSERT INTO [table2] select [champ1, champ2] FROM [table1] WHERE [table1].[champ2] = true"
    à
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    CurrentDb.Execute "INSERT INTO [table2] select champ1, champ2 FROM [table1] WHERE [table1].[champ2] = true"
    Donc:

    1- Non, pas d'accolade type [], seulement le champ puis une virgule. Je dois lister seulement les champs que je veux copier.
    2- Non, seulement changer le docmd.runsql en currentdb.execute
    3- Directement sur le bouton de commande

    Questions résiduelles
    1- Si j'ai un champ avec un espace vide, style 'champ 1', comment l'appeler dans la commande SELECT?
    2- Quelle commande VBA utiliser pour rafraîchir une table, parce que les champs ne semblent pas toujours s'afficher si je l'ouvre?

    Merci

  5. #5
    Rédacteur/Modérateur

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

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

    Informations forums :
    Inscription : Juillet 2007
    Messages : 14 598
    Points : 34 283
    Points
    34 283
    Par défaut
    Il faut voir la syntaxe de RunSQL avec
    Pas de = après le RunSQL

    pour la syntaxe avec des champs comportant des espaces, tu dois encadrer le nom du champ
    Code SQL : Sélectionner tout - Visualiser dans une fenêtre à part
    [champ 1],[champ 2]
    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 :
    Apprendre à programmer avec Access 2016, Access 2019 et 2021

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

    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

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

Discussions similaires

  1. copier une table d'une BDD dans une table d'une autre BDD
    Par faniette dans le forum C++Builder
    Réponses: 2
    Dernier message: 15/05/2013, 10h17
  2. [VB.Net] Comment copier une DataRow d'une table vers une autre ?
    Par YLF dans le forum Accès aux données
    Réponses: 7
    Dernier message: 05/09/2012, 23h23
  3. Réponses: 1
    Dernier message: 19/10/2011, 12h13
  4. Copier les enregistrements d'une table vers une table d'une autre DB
    Par karinette21 dans le forum Requêtes et SQL.
    Réponses: 4
    Dernier message: 18/11/2008, 21h50
  5. copier une ligne d'une table vers une autre
    Par Adren dans le forum Langage SQL
    Réponses: 5
    Dernier message: 08/08/2006, 11h54

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