[Resolvido]Fomulário Contínuo

Caros amigos, bom dia!

Tenho um campo de nome "iddetalheorc" que no evento ao clicar deste campo inseri o código informado abaixo para filtrar os dados do orçamento referente aquele orçamento. Até aí tudo ok o problema é que quando o campo informado não tem nenhum registro o VBA dá o informado abaixo.


Gostaria de saber se há uma forma de resolver esse erro. Até tentei usar no código o (On Error GoTo Err_iddetalheorc_Click), mas não resolveu.



---------------------------------------------------------------------
Erro em tempo de execução "3075"
Erro de sintaxe (operador faltando) na expressão de consulta
'[iddetalheorc]='
---------------------------------------------------------------------


>> Código que inseri no evento ao clicar do campo <<


Private Sub iddetalheorc_Click()

Dim stDocName As String
Dim stLinkCriteria As String

stDocName = "form_detalhe_orc"
stLinkCriteria = "[iddetalheorc]=" & Me![iddetalheorc]

DoCmd.OpenForm stDocName, , , stLinkCriteria


End Sub





Atenciosamente,

Fábio

Bom dia,

Experimenta código abaixo:

DoCmd.OpenForm "form_detalhe_orc", acNormal, , "[iddetalheorc] = '" & Me![iddetalheorc] & "'", , acNormal

Abraço..

Caro Roberto, bom dia!

Obrigado pela sua atenção, mas o código que você sugeriu deu o seguinte erro:



----------------------------------------------------------------
Erro em tempo de execução "3464"
Tipo de dados incompatível na expressão de critério.
----------------------------------------------------------------



Atenciosamente,

Fábio

Posta aqui sua BD...

Veja este exemplo que postei para um colega aqui do forum...
Abre ForPesquisa..

Roberto, bom dia!

Consegui resolver depois que verifiquei o exemplo que você postou.



Desde já, obrigado pela atenção e ajuda.

Fábio