Olá pessoal estou com um problema que não consigo resolver, tenho uma tabela com uma campo data abreviada com datas liberadas para agendamentos, no form tenho um calendario que retorna a data clicada para uma txtbox e um botão para abrir um subformulario continuo filtrado para exibir somente os registros para o dia selecionado, eu gostaria de comparar a data da txtbox com as datas liberadas na tabela para que somente abra o subform se a data estiver liberada para agendamento, não estou conseguindo montar o codigo vba para que o clique do botão verifique as datas e se estiver na tabela abra o subform e se não estiver abra uma msgbox, alguem pode ajudar?
2 participantes
[Resolvido]comparar valor de campo com valor de txtbox
ewertonms- Intermediário
- Respeito às regras :
Sexo :
Localização :
Mensagens : 83
Registrado : 20/09/2012
- Mensagem nº1
comparar valor de campo com valor de txtbox
Bred- Intermediário
- Respeito às regras :
Sexo :
Localização :
Mensagens : 115
Registrado : 15/09/2010
ewertonms. seria bom se você pudesse posta um exemplo do seu banco assim ficaria mais fácil poder lhe ajudar.
.................................................................................
"O topo da sabedoria é alcançar a humildade..."
ewertonms- Intermediário
- Respeito às regras :
Sexo :
Localização :
Mensagens : 83
Registrado : 20/09/2012
Bred, obrigado pelo retorno, mas fiz mais alguns testes e já encontrei a solução, segue abaixo:
Private Sub btnteste_Click()
If (DLookup("[id]", "tbldtliberada", "[lbdata]=" & "dtref")) > 0 Then
DoCmd.OpenForm "teste2"
Else
MsgBox "Dia não disponivel para agendamento"
End If
End Sub
Private Sub btnteste_Click()
If (DLookup("[id]", "tbldtliberada", "[lbdata]=" & "dtref")) > 0 Then
DoCmd.OpenForm "teste2"
Else
MsgBox "Dia não disponivel para agendamento"
End If
End Sub
» Comparar valor de caixa de texto com valor de uma coluna na listbox
» [Resolvido]Como fazer para que o valor de um campo numa lista seja copiado para uma TxtBox não acoplada em outro formulário?
» [Resolvido]Comparar Campo do Form principal com campo do Subform
» [Resolvido]Inserir num campo o valor de outro campo como Valor Padrão
» [Resolvido]Buscar Valor na Tabela e inserir no Campo // Descrição e Valor
» [Resolvido]Como fazer para que o valor de um campo numa lista seja copiado para uma TxtBox não acoplada em outro formulário?
» [Resolvido]Comparar Campo do Form principal com campo do Subform
» [Resolvido]Inserir num campo o valor de outro campo como Valor Padrão
» [Resolvido]Buscar Valor na Tabela e inserir no Campo // Descrição e Valor