[Resolvido]Consulta para relatório imprime tudo ou alguns.

Olá,

Apesar de envolver Formulário, mas como é baseado numa consulta, coloquei a dúvida em consulta. (pode mudar se estiver em local errado).

Tenho um Form que coloquei uma Combox com as delegacias, e um botão para imprimir que chama o relatório.
Esse form é baseado em uma consulta onde no campo local tem essa condição [forms]![FrmEscolhaLocal]![Exercicio].
A pessoa escolhe qual delegacia quer os veículos.

Gostaria de saber se tem como usar na mesma consulta imprimir todos também, não sei se incluir algo na combo ou algo na consulta.

Obrigado.

Olá flexa,

Tenta assim:

Como "*" & [forms]![FrmEscolhaLocal]![Exercicio] & "*"


Nivaldo.

Nivaldo, acho que dessa forma terei que ter duas consulta, pois sempre que executa-la vai usar o coringa e imprimir todas.

Parece que eu vi um tipo de filtro para formulário que, na Combox tinha um item como a palavra , no primeiro item da combox, e quando deixasse a combox em o formulário  carregava  (retirava o filtro) e quando escolhesse outro item da combox ele ativava o filtro para o formulário e carregava os registros filtrados pelo valor da combox. e a programação ficava no evento após atualizar da combox.

Eu queri a algo assim, que com um só relatório e um só form para imprimir usasse esse tipo.

Será que dá?

Olá,

Na expressão: Como "*" & [forms]![FrmEscolhaLocal]![Exercicio] & "*"

Exercicio é o nome do campo ou da combo???


Nivaldo.

Nivaldo,

Exercicio é nome da Combox. e o campo onde está o critério na consulta é "Local".

https://www.dropbox.com/s/6chx701s4gke0rh/Teste.mdb

Olá Flexa,

Dá uma olhada e vê se é isso que precisa.

Se você não selecionar nenhum local na combo, no relatório vai sair todos os registros.


Nivaldo.

Nivaldo,

Perfeito é isso mesmo.

Foi só essa alteração + a consulta alterada no critério:

Private Sub Exercicio_AfterUpdate()
   Me.TxtLocal = Me.Exercicio.Column(1)
End Sub

Tinha esquecido da caixa de texto TxtLocal no form.
Muito obrigado.

Que bom que resolveu.

Obrigado pelo retorno, o forum agradece.


Nivaldo.