Caro colegas, está dando erro neste SELECT.
Diz que: A variável do objeto ou a variável do bloco "with" não foi definida.
Onde está o meu erro?
Agradeço desde já!
MPS
Private Sub Combinação391_AfterUpdate()
Dim DbMovFatura As Database
Dim RsDtFat As DAO.Recordset
Set RsDtFat = DbMovFatura.OpenRecordset("SELECT top 1 * FROM [movimentacao] WHERE faturado > 0" & "and codconvenio2 =" & Combinação391 & "order by mesreferencia desc;")
Diz que: A variável do objeto ou a variável do bloco "with" não foi definida.
Onde está o meu erro?
Agradeço desde já!
MPS
Private Sub Combinação391_AfterUpdate()
Dim DbMovFatura As Database
Dim RsDtFat As DAO.Recordset
Set RsDtFat = DbMovFatura.OpenRecordset("SELECT top 1 * FROM [movimentacao] WHERE faturado > 0" & "and codconvenio2 =" & Combinação391 & "order by mesreferencia desc;")