Caros Colegas, o Procedimento abaixo funciona quando coloco um texto (ex: "*formex*"), mas não funciona se eu colocar o conteúdo de outra caixa de combinação. É possível fazer esta função LIKE desta forma? Onde estou errando?
Agradeço desde já!
MPS
Private Sub CodConvenio2_BeforeUpdate(Cancel As Integer)
If Me.CodConvenio2.Column(1) Like "*Me.CodConta2.Column(1)*" Then
Else
MsgBox "Este Convenio não tem relação com esta Conta. Reveja, por favor!", vbInformation
Cancel = True
End If
End Sub
Agradeço desde já!
MPS
Private Sub CodConvenio2_BeforeUpdate(Cancel As Integer)
If Me.CodConvenio2.Column(1) Like "*Me.CodConta2.Column(1)*" Then
Else
MsgBox "Este Convenio não tem relação com esta Conta. Reveja, por favor!", vbInformation
Cancel = True
End If
End Sub