Início
![[Resolvido]Obter a o Mês de Referência... Empty](https://2img.net/i/empty.gif)
MPS 1/2/2013, 13:34Caro 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;")
