Estou com um problema na expressão abaixo, em um form com um campo de entrada "numerocad" e um botão de OK que testa o BD para ver se existe o nº digitado, se existir ele abre para verificação se não existir ele abre um form para cadastrá-lo, até ai tudo bem!
O que acontece é se eu clicar Ok com o campo vazio dá o erro 3075 informando erro de sintaxe (operador faltando) 'Numero ='
Como possso resolver
Private Sub Comando2_Click()
If IsNull(DLookup("Numero", "Material", "Numero = " & NumeroCad)) Then
DoCmd.OpenForm "frmMaterialCadastro"
Else
MsgBox "Esse Nº já está Cadastrado, Verifique! vou abrir ele...." & Chr(13) & Chr(10) & _
Chr(10) & "No formulário que abrir, confira que ele já esta Cadastrado" & Chr(13) & Chr(10) & _
Chr(10) & "Se precisar ALTERAR algo faça nele e depois Feche o Formulário", , "Ops.... Esse Nº de Material já tem!!!"
'DoCmd.Close acForm, Me.Name
DoCmd.OpenForm "Material verificação", , "Material", "Numero = " & NumeroCad
DoCmd.Close acForm, Me.Name
End If
End Sub
Pergunta
Flecha
Olá,
Estou com um problema na expressão abaixo, em um form com um campo de entrada "numerocad" e um botão de OK que testa o BD para ver se existe o nº digitado, se existir ele abre para verificação se não existir ele abre um form para cadastrá-lo, até ai tudo bem!
O que acontece é se eu clicar Ok com o campo vazio dá o erro 3075 informando erro de sintaxe (operador faltando) 'Numero ='
Como possso resolver
Link para o comentário
Compartilhar em outros sites
1 resposta a esta questão
Posts Recomendados
Participe da discussão
Você pode postar agora e se registrar depois. Se você já tem uma conta, acesse agora para postar com sua conta.