[Resolvido]Menu de Consultas

Boa Tarde a todos queria vos pedir ajuda, gostava de criar um menu para as consultas mas não estou muito habituado a trabalhar com Access
que eu podia Preencher apenas o que eu quiser neste caso so pesquisar pelo intervalo de datas,
e depois de clicar no botao pesquisar aparecer uma listagem fora do menu como o que eu pesquisei
Obrigado

Ola amigo, você pode fazer isso de maneira facil criando uma consulta e no criterio

do campo data colocar:

Entre [Digite a data inicial] E [Digite a data final]

Eu já fiz assim mas não fica como eu gostava que fica-se, porque fica logo em forma de lista
Eu queria se possível ficar um menu inicial com os campos para preencher
Nome:
Intervalo de datas:
Processo:
Agente de execução:
E que a pessoal escreve-se só o que quiser para procurar e que depois de clicar no botão apareça a lista já filtrada conforme escrevi no campo
Obrigado

Veja se seria mais ou menos como nesses exemplo..

http://maximoaccess.forumeiros.com/t11166-filtros-em-sub-formulario-combos-e-entre-datas?highlight=filtros
http://maximoaccess.forumeiros.com/t1850-4-filtros-por-cidade-uf-tipo-de-fornecedor-e-situacao?highlight=filtros

Obrigado pela disponibilidade em ajudar mas eu não me estou a fazer entender vou deixar a base de dados para ver se fica mais facil
Não da para fazer com este formulário dividido?
Na parte de cima pesquiso e na parte de baixo aparece a lista?

Boa noite,
Veja o form Tabela1A

Boa Tarde Antes de mais obrigado Fernando Bueno e Alexandre Neves pela disponiblidade

Esta Muito Bom Obrigado Alexandre Neves,

so queria ver se era possivel mais uma coisa. da para meter a Aparecer a pesquisa sempre que eu meto um carácter ou um digito como aparece naquela pesquisa(filtro) pequenina que o Access já disponibiliza?
E mais uma coisa esta muito bem a pesquisa mas é se eu meter o valor todo, e isso não é o correcto para o meu caso,
Eu queria que se eu mete-se só: Pedro depois apareça
Pedro Alberto Fernando
Alberto Pedro João
Luís João Pedro
Mais ou menos isto
Obrigado a todos.

Boa tarde,
No acontecimento AoAlterar de cada um dos controlos de introdução, coloque
Dim strFiltro As String
If Len(TxtID) > 0 Then strFiltro = " and InStr(1,ID," & TxtID & ")>0"
If Len(TxtParte01) > 0 Then strFiltro = strFiltro & " and InStr(1,nArqParte01,'" & TxtParte01 & "')>0"
If Len(TxtParte01) > 0 Then strFiltro = strFiltro & " and InStr(1,nArqParte02,'" & TxtParte02 & "')>0"
If Len(TxtParte01) > 0 Then strFiltro = strFiltro & " and InStr(1,nArqParte03,'" & TxtParte03 & "')>0"
If Len(TxtParte01) > 0 Then strFiltro = strFiltro & " and InStr(1,nArqParte04,'" & TxtParte04 & "')>0"
If Len(TxtParte01) > 0 Then strFiltro = strFiltro & " and InStr(1,AgenteExecucao,'" & TxtAgenteExecucao & "')>0"
If Len(strFiltro) > 0 Then strFiltro = " WHERE " & Mid(strFiltro, 5)
RecordSource = "SELECT * FROM Tabela1" & strFiltro & " ORDER BY ID, nArqParte01"

Boa Tarde
Obrigado pela ajuda mas nao estou a conseguir meter a funcionar como eu queria
Agradeço na mesma a ajuda de todos.