[Resolvido]Filtrar listbox entre datas em um formulario

Olá,

Coloca o critério de data na consulta que alimenta a listbox:

Entre Forms!TeuFormulario!datainicial E Forms!TeuFormulario!datafinal

No evento Ao clicar do botão:

Me.TuaListBox.Requery


Deve resolver.

Nivaldo.

Bom dia,

Dê mais informações (nomes de campos, formulários, sql da consulta, etc), ou então faça um pequeno exemplo do teu bd e disponibiliza aqui.
Fica mais fácil ajudar com bastante informações.

Nivaldo.

Se na consulta tiver dois campos ( DataInicial) e outro (DataFinal)
Tente:
No critério do campo (DataInicial): Como Forms!TeuFormulario!datainicial  em vermelho vai o nome do formulário onde vai filtrar
No critério do campo (DataFinal): Como Forms!TeuFormulario!datafinal , em vermelho vai o nome do formulário onde vai filtrar


No evento Ao clicar do botão:

Me.TuaListBox.Requery, em vermelho coloque o nome da sua ListBox. Observe os nome, pois se tiver diferente não funciona mesmo.


Att,

Então segue o que nosso Amigo Nivaldo escreveu anteriormente, que deve funcionar...

Olá José,

Na primeira postagem você mencionou duas caixas de texto (datainicial e datafinal) para filtrar.
Orientei segundo o que você escreveu.
O que você realmente está precisando? Um período entre datas ou duas datas específicas????

Nivaldo.

É isso ae, se é um só campo "DtExecucao ", no criterio desse campo você deve colocar como já lhe explicaram;

No criterio do campo "DtExceucao" na consulta:

Between [Forms]![SeuFormulario]![DataInicial] And [Forms]![SeuFormulario]![DataFinal]



Se não é para ser filtrado por um formulario, será o simples;


Between [DataInicial] And [DataFinal]

Bom dia,

Dá uma olhada no arquivo em anexo.

As dúvidas que forem aparecendo é só postar.

Nivaldo.

Desculpa,

Segue em anexo.

Nivaldo.

Olá,

Testa o seguinte:

Na origem da linha da lista altera o critrério que está no campo DtExecucao para o campo DtPedido.


Nivaldo.

Boa noite José,

Como na sua tabela tem registros onde o campo DtExecucao está nulo (sem data definida), achei por bem colocar o filtro no campo DtPedido (conforme exemplo enviado anteriormente).

Se colocar o filtro/critério de data no campo DtExecucao a consulta irá retornar somente os registros que estiverem com a data inserida.

Coloca a instrução sql abaixo na Origem da Linha da caixa de listagem Lista0 e faz um teste.


SELECT tbl_folha_serviço.IDservico, Format([DtPedido],'yyyy') AS Ano, Format([DtPedido],'mmmm') AS Mês, tbl_folha_serviço.NOrdem, tbl_folha_serviço.NEdoc, tbl_folha_serviço.NProc, tbl_folha_serviço.DespSuperior, tbl_folha_serviço.DtPedido, tbl_folha_serviço.Area, tbl_folha_serviço.Freg, tbl_folha_serviço.Obra, tbl_folha_serviço.TrabExecutar, tbl_folha_serviço.DtExecucao, tbl_folha_serviço.Situação
FROM tbl_folha_serviço
WHERE (((tbl_folha_serviço.DtPedido) Between EscolheDataA([Formulários]![Frm_Folha_Serviço]![DataInicial]) And EscolheDataB([Formulários]![Frm_Folha_Serviço]![DataFinal])))
ORDER BY tbl_folha_serviço.IDservico;

Nivaldo.

Olá José,

Pode criar um botão ou escolha um evento que você achar melhor e coloca o código abaixo:

Me.DataInicial = Null
Me.DataFinal = Null
Me.DataInicial.SetFocus

Deve resolver.

Obrigado pelo retorno.


Nivaldo.

Boa noite,

Faz um teste:

Me.DataInicial = Null
Me.DataFinal = Null
Me.Lista0.Requery
Me.DataInicial.SetFocus


Nivaldo.