[vba] pb chaine trop longue vba acccess
Guiom
-
WhiteFang Messages postés 2063 Statut Membre -
WhiteFang Messages postés 2063 Statut Membre -
Bonjour,
J'ai un pb sur access dans le code.
J'ai fait une requête (qui marche) que je voudrais intégrer dans du code. Seulement la requête est trop longue et ne rentre pas sur une ligne.
J'ai donc inséré "_" à la fin de la ligne pour couper la requête en 2, mais il me signale une erreur (erreur de compilation, Attendu séparateur de liste ou ) ) alors que la syntaxe de ma requête est bonne (j'ai vérifié).
Bref je sèche depuis 2 heures dessus.
Voici la ligne maudite:
Set vrf = mb.OpenRecordset("SELECT reception_commande.numpro, reception_commande.numtai, reception_commande.numcou, Sum(reception_commande.qterec) AS SommeDeqterec, couleur.libcou, produit.refpro, saison.libsai, commande.anncom, taille.libtai, fournisseur.numfrs, fournisseur.libfrs, saison.numsai FROM taille INNER JOIN (saison INNER JOIN (produit INNER JOIN (fournisseur INNER JOIN (couleur INNER JOIN (commande INNER JOIN reception_commande ON commande.numcom = reception_commande.numcom) ON couleur.numcou = reception_commande.numcou) ON fournisseur.numfrs = commande.numfrs) ON produit.numpro = reception_commande.numpro) ON saison.numsai = commande.numsai) ON taille.numtai = reception_commande.numtai GROUP BY reception_commande.numpro, reception_commande.numtai, reception_commande.numcou, couleur.libcou, produit.refpro, saison.libsai, commande.anncom, taille.libtai, fournisseur.numfrs, fournisseur.libfrs, saison.numsai _
HAVING (((commande.anncom)=" & me.annf & ") AND ((fournisseur.numfrs)= " & me.magf & ") AND ((saison.numsai)= " & me.saif & "));")
Merci
J'ai un pb sur access dans le code.
J'ai fait une requête (qui marche) que je voudrais intégrer dans du code. Seulement la requête est trop longue et ne rentre pas sur une ligne.
J'ai donc inséré "_" à la fin de la ligne pour couper la requête en 2, mais il me signale une erreur (erreur de compilation, Attendu séparateur de liste ou ) ) alors que la syntaxe de ma requête est bonne (j'ai vérifié).
Bref je sèche depuis 2 heures dessus.
Voici la ligne maudite:
Set vrf = mb.OpenRecordset("SELECT reception_commande.numpro, reception_commande.numtai, reception_commande.numcou, Sum(reception_commande.qterec) AS SommeDeqterec, couleur.libcou, produit.refpro, saison.libsai, commande.anncom, taille.libtai, fournisseur.numfrs, fournisseur.libfrs, saison.numsai FROM taille INNER JOIN (saison INNER JOIN (produit INNER JOIN (fournisseur INNER JOIN (couleur INNER JOIN (commande INNER JOIN reception_commande ON commande.numcom = reception_commande.numcom) ON couleur.numcou = reception_commande.numcou) ON fournisseur.numfrs = commande.numfrs) ON produit.numpro = reception_commande.numpro) ON saison.numsai = commande.numsai) ON taille.numtai = reception_commande.numtai GROUP BY reception_commande.numpro, reception_commande.numtai, reception_commande.numcou, couleur.libcou, produit.refpro, saison.libsai, commande.anncom, taille.libtai, fournisseur.numfrs, fournisseur.libfrs, saison.numsai _
HAVING (((commande.anncom)=" & me.annf & ") AND ((fournisseur.numfrs)= " & me.magf & ") AND ((saison.numsai)= " & me.saif & "));")
Merci
A voir également:
- [vba] pb chaine trop longue vba acccess
- Incompatibilité de type vba ✓ - Forum VB / VBA
- Erreur 13 incompatibilité de type VBA excel ✓ - Forum Excel
- Chaine tnt gratuite sur mobile - Guide
- Find vba - Astuces et Solutions
- Vba range avec variable ✓ - Forum VB / VBA
2 réponses
Salut toi! en fait tu devrais plutôt essayer:
Set vrf=mb.OpenRecordset("Select ..., Saison.NumSai " & _
"HAVING (((Commande.AnneeCom ....;")
Fort probablement ça va marcher, bonne chance à toi!
Set vrf=mb.OpenRecordset("Select ..., Saison.NumSai " & _
"HAVING (((Commande.AnneeCom ....;")
Fort probablement ça va marcher, bonne chance à toi!
Salut!
Bon j'ai testé la méthode de WhiteFang en utilisant des variables et ça marche!
RicHamilton par curiosité j'ai aussi essayé ce que tu m'as marqué et ça marche nickel! Il me manquait donc les " à la fin de la première ligne et au début de la suivante... 2 heures de perdues juste pour ça!
Bref merci beaucoup pour vos réponses c'est sympa!
Bon j'ai testé la méthode de WhiteFang en utilisant des variables et ça marche!
RicHamilton par curiosité j'ai aussi essayé ce que tu m'as marqué et ça marche nickel! Il me manquait donc les " à la fin de la première ligne et au début de la suivante... 2 heures de perdues juste pour ça!
Bref merci beaucoup pour vos réponses c'est sympa!
Access ne me signale plus d'erreur, reste à tester si ça marche, la suite lundi...