Erro em tempo de execução 3464
Tipo de dados incompativel com dados de critério.
Pretendo realizar uma consulta onde a pessoa digite o número do processo que tem 18 caracteres aproximadamente para isso usei o campo texto porém está dando a mensagem a cima. utilizando o tipo inteiro funciona perfeita mente mas com texto da problema alguém ajuda?
Private Sub Num_Processo_Acomp_LostFocus()
Dim rs As DAO.Recordset
Dim Num_Processo_Acomp As String
Set rs = Me.RecordsetClone
Num_Processo_Acomp = Me![Num_Processo_Acomp]
rs.FindFirst "[Num_Processo_Acomp]=" & Num_Processo_Acomp
If rs.NoMatch Then
Erro em tempo de execução 3464
Tipo de dados incompativel com a expressão do cretério
DoCmd.RunCommand acCmdUndo
DoCmd.GoToRecord , , acNewRec
Me![Num_Processo_Acomp] = Num_Processo_Acomp
Me![Num_Processo_Acomp].SetFocus
Else
If Me.Dirty Then
Me.Undo
End If
'DoCmd.RunCommand acCmdUndo
Me.Bookmark = rs.Bookmark
End If
End Sub