Necesito ayuda para una Consulta en visual de access

Hola, quisiera saber si alguien me puede ayudar a resolver un problema que tengo con una consulta que estoy realizando en visual de access, me arroja: Se ha producido el error '3061' en tiempo de ejecución: Pocos parámetros. Se esperaba 1.

La consulta es la siguiente:

Private Sub Form_DblClick(Cancel As Integer)
Set dbs = CurrentDb

str = "INSERT INTO PDCantosxOrdendeProducción ( IdCantos, IdOrdendeProducción, QCantos, LoteNo )"

str = str & SELECT MSCantos.IdCantos, PDDatosMueblesDespiece.IdOrdendeProducción, Sum((IIf([PDDespieceMueblesSubPIezas].[Id Ref Canto L1] Is Null,(0),(([PDMueblesDespieceSubMuebles.QUE Lt1]*[PDDespieceMueblesSubPiezas.Cantidad Piezas por Mueble])*[PDDespieceMueblesSubPiezas.Largo])/1000)+IIf([PDDespieceMueblesSubPIezas].[Id Ref Canto L2] Is Null,(0),(([PDMueblesDespieceSubMuebles.QUE Lt1]*[PDDespieceMueblesSubPiezas.Cantidad Piezas por Mueble])*[PDDespieceMueblesSubPiezas.Largo])/1000)+IIf([PDDespieceMueblesSubPIezas].[Id Ref Canto A1] Is Null,(0),(([PDMueblesDespieceSubMuebles.QUE Lt1]*[PDDespieceMueblesSubPiezas.Cantidad Piezas por Mueble])*[PDDespieceMueblesSubPiezas.Ancho])/1000)+IIf([PDDespieceMueblesSubPIezas].[Id Ref Canto A2] Is Null,(0),(([PDMueblesDespieceSubMuebles.QUE Lt1]*[PDDespieceMueblesSubPiezas.Cantidad Piezas por Mueble])*[PDDespieceMueblesSubPiezas.Ancho])/1000))) AS TotalLt1, ('Lt1')
str = str & FROM MSCantos INNER JOIN ((PDDatosMueblesDespiece INNER JOIN PDMueblesDespieceSubMuebles ON PDDatosMueblesDespiece.[Id Datos Muebles Despiece] = PDMueblesDespieceSubMuebles.[Id Datos Muebles Despiece]) INNER JOIN PDDespieceMueblesSubPiezas ON PDMueblesDespieceSubMuebles.[Id Muebles de despiece] = PDDespieceMueblesSubPiezas.[Id Muebles de Despiece]) ON MSCantos.IdCantos = PDDespieceMueblesSubPiezas.[Id Ref Canto L1]
Agradezco cualquier ayuda.

Gracias.

Añade tu respuesta

Haz clic para o