[Resolvido] Clicar no botão e ele informar a consulta que o critério dele será o OpenArgs???

Olá pessoal!

Eu estou usando um formulário para controle de varias maquinas, usando o OpenArgs eu só clico no botão e lá eu defino a maquina
então eu não preciso fazer varias tabelas para mesma coisa.
gostaria de usar o mesmo método para as consultas.

só que me deparei com um problema, quando eu chamo o relatório ele dá um erro, bem pensando sozinho eu imagino 
que e porque o relatório e baseado na consulta então se eu definir 

Private Sub Comando1_Click()
DoCmd.OpenReport "Relatorio_Receita_Areceber", acViewReport, , , , "Maquina01"
End Sub

e no evento load do relatório

Private Sub Report_Open(Cancel As Integer)
Maquina = OpenArgs
End Sub

não vai dar certo mesmo porque eu teria que informar o OpenArgs para a consulta e não para relatório.

Bem então:
Estou pensando certo? 
Se estou como eu resolvo??

Como eu faço para clicar no botão e ele informar a consulta que o critério dele será o OpenArgs???

Segue em anexo o projeto.

Obrigado!

Sabe aquela coisa que muda sua vida completamente??? pois é! isso e uma delas. kkkkk

Parece que estava na pré-historia kkk me sinto como se tivesse descoberto a RODA. kkkk


Cara isso vai facilitar e melhorar minhas aplicações em 200 bilhões de vezes kkkkk

Já sofri tanto fazendo milhões de tabelas e consultas, copiando em colando, copiando e colando kkkk

Cara muito obrigado!!! kkk, muito obrigado mesmo

a você Jpaulo e todo pessoal do Maximo Access.

Obrigado pelo retorno o forum agradece.