Error 3061. Too few parameters. Expected 2

[Sylvestre]

Hola foreros!

Me encuentro con el siguiente problema:
Al hacer la consulta de abajo, me devuelve el Error 3061, Too few parameters, Expected 2.

CadenaSql = "SELECT Chistclin.clave, Chistclin.nombre, Chistclin.apell1, Chistclin.apell2, Chistclin.edad, Chistclin.patologi, Chistclin.lateralid, Chistclin.contrala, Chistclin.comtec, Chistclin.funcion, Chistclin.agudepre, Chistclin.agudepost, Chistclin.celulas, Cronda.mediana, Cronda.acuerdon, Cronda.apon FROM Cronda INNER JOIN Chistclin ON" & _
"(Cronda.patolon = Chistclin.patologi) AND (Cronda.lateralin = Chistclin.lateralid) AND (Cronda.comtecn = Chistclin.comtec) AND (Cronda.funcionn = Chistclin.funcion) AND (Cronda.agudepren = Chistclin.agudepre) AND (Cronda.contralan = Chistclin.contrala) AND (Cronda.ds = Chistclin.ds) Where (((Chistclin.patologi) = 'Catarata Simple')And ((Cronda.apon) = 'Inapropiado')) Union " & _
"SELECT Chistclin.clave, Chistclin.nombre, Chistclin.apell1, Chistclin.apell2, Chistclin.edad, Chistclin.patologi, Chistclin.lateralid, Chistclin.contrala, Chistclin.comtec, Chistclin.funcion, Chistclin.agudepre, Chistclin.agudepost, Chistclin.celulas, Cronda.mediana, Cronda.acuerdon, Cronda.apon FROM Cronda INNER JOIN Chistclin ON" & _
"(Cronda.patolon = Chistclin.patologi) AND (Cronda.lateralin = Chistclin.lateralid) AND (Cronda.comtecn = Chistclin.comtec) AND (Cronda.funcionn = Chistclin.funcion) AND (Cronda.agudepren = Chistclin.agudepre) AND (Cronda.contralan = Chistclin.contrala) AND (Cronda.ds = Chistclin.ds) Where (((Chistclin.patologi) = 'Catarata Simple')) Union " & _
"SELECT Chistclin.clave, Chistclin.nombre, Chistclin.apell1, Chistclin.apell2, Chistclin.edad, Chistclin.patologi, Chistclin.lateralid, Chistclin.contrala, Chistclin.comtec, Chistclin.funcion, Chistclin.agudepre, Chistclin.agudepost, Chistclin.celulas, Cronda.mediana, Cronda.acuerdon, Cronda.apon FROM Cronda INNER JOIN Chistclin ON (Cronda.patolon = Chistclin.patologi) AND (Cronda.lateralin = Chistclin.lateralid) AND (Cronda.comtecn = Chistclin.comtec) AND (Cronda.funcionn = Chistclin.funcion) AND (Cronda.agudepren = Chistclin.agudepre) AND (Cronda.agudeposn = Chistclin.agudepost) AND (Cronda.contralan = Chistclin.contrala)Where (((Chistclin.patologi) = 'Retinopatia Diabetica'))Union " & _
"SELECT Chistclin.clave, Chistclin.nombre, Chistclin.apell1, Chistclin.apell2, Chistclin.edad, Chistclin.patologi, Chistclin.lateralid, Chistclin.contrala, Chistclin.comtec, Chistclin.funcion, Chistclin.agudepre, Chistclin.agudepost, Chistclin.celulas, Cronda.mediana, Cronda.acuerdon, Cronda.apon FROM Cronda INNER JOIN Chistclin ON (Cronda.patolon = Chistclin.patologi) AND (Cronda.lateralin = Chistclin.lateralid) AND (Cronda.comtecn = Chistclin.comtec) AND (Cronda.funcionn = Chistclin.funcion) AND (Cronda.agudepren = Chistclin.agudepre) AND (Cronda.agudeposn = Chistclin.agudepost) AND (Cronda.contralan = Chistclin.contrala) AND (Cronda.ds = Chistclin.ds) Where (((Chistclin.patologi) = 'Retinopatia Diabetica') And ((Cronda.apon) = 'Inapropiado'))Union " & _
"SELECT Chistclin.clave, Chistclin.nombre, Chistclin.apell1, Chistclin.apell2, Chistclin.edad, Chistclin.patologi, Chistclin.lateralid, Chistclin.contrala, Chistclin.comtec, Chistclin.funcion, Chistclin.agudepre, Chistclin.agudepost, Chistclin.celulas, Cronda.mediana, Cronda.acuerdon, Cronda.apon FROM Cronda INNER JOIN Chistclin ON (Cronda.patolon = Chistclin.patologi) AND (Cronda.lateralin = Chistclin.lateralid) AND (Cronda.comtecn = Chistclin.comtec) AND (Cronda.funcionn = Chistclin.funcion) AND (Cronda.agudepren = Chistclin.agudepre) AND (Cronda.agudeposn = Chistclin.agudepost) AND (Cronda.contralan = Chistclin.contrala) AND (Cronda.ds = Chistclin.ds) Where (((Chistclin.patologi) = 'Retinopatia Diabetica'))Union " & _
"SELECT Chistclin.clave, Chistclin.nombre, Chistclin.apell1, Chistclin.apell2, Chistclin.edad, Chistclin.patologi, Chistclin.lateralid, Chistclin.contrala, Chistclin.comtec, Chistclin.funcion, Chistclin.agudepre, Chistclin.agudepost, Chistclin.celulas, Cronda.mediana, Cronda.acuerdon, Cronda.apon FROM Cronda INNER JOIN Chistclin ON (Cronda.patolon = Chistclin.patologi) AND (Cronda.lateralin = Chistclin.lateralid) AND (Cronda.ds = Chistclin.ds) AND (Cronda.comtecn = Chistclin.comtec) AND (Cronda.funcionn = Chistclin.funcion) AND (Cronda.agudepren = Chistclin.agudepre) AND (Cronda.agudeposn = Chistclin.agudepost) AND (Cronda.contralan = Chistclin.contrala) Where (((Chistclin.patologi) = 'Otra patologia asociada'))Union " & _
"SELECT Chistclin.clave, Chistclin.nombre, Chistclin.apell1, Chistclin.apell2, Chistclin.edad, Chistclin.patologi, Chistclin.lateralid, Chistclin.contrala, Chistclin.comtec, Chistclin.funcion, Chistclin.agudepre, Chistclin.agudepost, Chistclin.celulas, Cronda.mediana, Cronda.acuerdon, Cronda.apon FROM Cronda INNER JOIN Chistclin ON (Cronda.patolon = Chistclin.patologi) AND (Cronda.lateralin = Chistclin.lateralid) AND (Cronda.ds = Chistclin.ds) AND (Cronda.comtecn = Chistclin.comtec) AND (Cronda.funcionn = Chistclin.funcion) AND (Cronda.agudepren = Chistclin.agudepre) AND (Cronda.agudeposn = Chistclin.agudepost) AND (Cronda.contralan = Chistclin.contrala) Where (((Chistclin.patologi) = 'Otra patologia asociada') And ((Cronda.apon) = 'Inapropiado'))Union " & _
"SELECT Chistclin.clave, Chistclin.nombre, Chistclin.apell1, Chistclin.apell2, Chistclin.edad, Chistclin.patologi, Chistclin.lateralid, Chistclin.contrala, Chistclin.comtec, Chistclin.funcion, Chistclin.agudepre, Chistclin.agudepost, Chistclin.celulas, Cronda.mediana, Cronda.acuerdon, Cronda.apon FROM Cronda INNER JOIN Chistclin ON (Cronda.patolon = Chistclin.patologi) AND (Cronda.lateralin = Chistclin.lateralid) AND (Cronda.ds = Chistclin.ds) AND (Cronda.comtecn = Chistclin.comtec) AND (Cronda.funcionn = Chistclin.funcion) AND (Cronda.agudepren = Chistclin.agudepre) AND (Cronda.agudeposn = Chistclin.agudepost) AND (Cronda.contralan = Chistclin.contrala) Where (((Chistclin.patologi) = 'Otra patologia asociada'))Union " & _
"SELECT Chistclin.clave, Chistclin.nombre, Chistclin.apell1, Chistclin.apell2, Chistclin.edad, Chistclin.patologi, Chistclin.lateralid, Chistclin.contrala, Chistclin.comtec, Chistclin.funcion, Chistclin.agudepre, Chistclin.agudepost, Chistclin.celulas, Cronda.mediana, Cronda.acuerdon, Cronda.apon FROM Cronda INNER JOIN Chistclin ON (Cronda.patolon = Chistclin.patologi) AND (Cronda.lateralin = Chistclin.lateralid) AND (Cronda.ds = Chistclin.ds) AND (Cronda.comtecn = Chistclin.comtec) AND (Cronda.funcionn = Chistclin.funcion) AND (Cronda.agudepren = Chistclin.agudepre) AND (Cronda.celulasn = Chistclin.celulas) AND (Cronda.contralan = Chistclin.contrala) Where (((Chistclin.patologi)='Distrofia corneal'))"
Debug.Print CadenaSql
Set Conjunto_de_resultados = Base_de_datos.OpenRecordset(CadenaSql, dbOpenSnapshot)

El error e produce cuando añado la sentencia Cronda.ds = Chistclin.ds....
Me podríais ayudar? Gracias dee antemano.
Saludos

[Skalitiko]

Ese error se refiere a que tienes poco parametros, probablemente en alguna parte de la consulta escribiste mal el nombre de algún campo (de hecho ,de 2 campos), es por eso que te devuelve ese error

[Sylvestre]

Hoal foreros..........
He de deciros que ya resolví el problema que tenía.. todo se redujo a que a la base de datos que estaba haciendo la conexión no era la que yo pretendía.. era una versión anterior..en la que alguna de las variuables no estaban definidas en la tabla en la que yo etaba haciendo la consulta...

Gracias de todos modos por vuestra ayuda y atención..
Saludos,

y a pasarlo bien en vacaciones...