Discussion :

[mossaab.hardy]

Je ne sais pas pourquoi on m'affiche cette erreur (Trop peu de paramètres. 3 attendu.) lors de l'exécution de ce code VBA :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
Dim db1 As DAO.Database
Dim rec1 As DAO.Recordset
Dim T1 As Variant
Set db1 = CurrentDb
Set rec1 = db1.OpenRecordset("requête4")
T1 = rec1.GetRows(rec1.RecordCount)

code SQL de la requête 4 :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
SELECT tb_dis_cha.Distance, tb_dis_cha.Charge, tb_fleche.Modèle, tb_fleche.Flèche, tb_fleche.Mouflage
FROM tb_fleche INNER JOIN tb_dis_cha ON tb_fleche.ID_fleche = tb_dis_cha.ID_fleche
WHERE (((tb_fleche.Modèle)=[Formulaires]![f_verificationmanuelle]![Mod_Modele2]) AND ((tb_fleche.Flèche)=[Formulaires]![f_verificationmanuelle]![Mod_fleche2]) AND ((tb_fleche.Mouflage)=[Formulaires]![f_verificationmanuelle]![Mod_mouflage2]));

[loufab]

Bonjour,
Il s'agit d'un message habituel et qui est traité régulièrement dans le forum.
Une simple recherche avec "Trop peu de paramètres" dans les titres du forum ACCESS te donneront les raisons et les solutions possibles.

Cordialement,