Boa tarde
DoCmd.OpenForm "VerConsuta" where "[IDConsulta]=" & Lista.Column(6)
Esta função dá erro no Where.
O que falta
Obrigado
DoCmd.OpenForm "VerConsuta" where "[IDConsulta]=" & Lista.Column(6)
Esta função dá erro no Where.
O que falta
Obrigado
Meu novo site: www.vcssistemas.com.br Clique aqui e veja um vídeo que explica como fazer pesquisas no forum. DICA: Quando precisar inserir um exemplo do seu aplicativo, siga os procedimentos abaixo: 1 - faça uma cópia do aplicativo 2 - retire tudo que não for necessário à solução do problema, exceto o que o aplicativo precisar para funcionar 3 - use o Compactar/Reparar 4 - compacte o aplicativo em zip ou rar (zip para postagem como anexo na mensagem) Agradeça a quem lhe ajudou, clicando no joinha de uma das mensagens do usuário. Positive as mensagens que achar útil, no canto superior direito delas. |