Abrir um relatório baseado no registo activo

Boa tarde a todos,
estou a tentar e não consigo resolver a minha situação.
Tenho 3 tabelas
clientes                                              
-id_cliente                                        
-nome                                            
                                                       
artigos
-id_artigo
-id_cliente
-marca

 reparacoes
-id_reparacao
-id_artigo
-avaria



Estou a tentar criar uma macro para aceder ao relatório que contém uma avaria específica de 1 produto, mas aparece-me sempre todos as avarias de um determinado produto.
este é o código que estou a utilizar:

Private Sub Número_Reparação_DblClick(Cancel As Integer)
Dim strDocName As String
Dim strWhere As String
   strDocName = "Ficha"
   strWhere = "[id_artigo]=" & Me!id_artigo
   DoCmd.OpenReport strDocName, acPreview, , strWhere
End Sub

Agradecia muito a vossa ajuda.
Obrigado

strWhere = "[id_artigo]=" & Me!id_artigo & ""


Certifique-se de que:


 id_artigo é o nome do Campo da tabela
 Me!id_artigo é o nome de um Campo do formulário que mostra o ID do Artigo.

Obrigado pela resposta.
Fiz como disse e continuo com o mesmo problema.
anexei imagens com as várias partes do projeto, pode ser que assim seja mais fácil.
Mais uma vez, obrigado pela ajuda.

Posta aqui seu Aplicativo

Muito Obrigado.
Aqui vai o meu projecto.

https://www.dropbox.com/s/yyn21cftqm04jsl/Eletroclinica.accdb?dl=0

Eis o seu problema amigo: Falta de Informações no seu Post.

No Seu Caso, o Campo Tipo Artigo está em um Subformulario...
Dessa forma nao podemos passar so o nome do campo, temos que informar o Nome do Formulario!NomeCampo.

Mude seu Comando para:

Private Sub Comando27_Click()

Dim strDocName As String
Dim strWhere As String
strDocName = "Ficha"
strWhere = "[Tipo de artigo] ='" & [Artigos Subformulário].Form![Tipo de artigo] & "'"
DoCmd.OpenReport strDocName, acPreview, , strWhere

End Sub


Obs: Filtrei pelo Campo Tipo Artigo, pois acredito que seja essa sua intenção, se nao for basta mudar o Campo e remover a 'Aspa Simples'

Desculpe, esqueci-me de referir a situação dos subformulários.
Agora aparece todos os artigos e todas as avarias.
Eu pretendo apenas o artigo seleccionado e a avaria seleccionada.
Apesar de o artigo ter várias avarias, apenas pretendo imprimir a seleccionada.
Obrigado

Ta vendo so amigo, esta omitindo informaçoes, assim fica dificil ir direto a resoluçao do topico.

Agora vc falou que na verdade, alem do campo a ser filtrado esta em um subformulario, vc ainda quer filtrar por mais outro campo que esta no outro sub formulario...

Seria somente isso?

Desculpe pela falta de informação.
Pretendo listar um artigo apenas (sub formulário) e uma reparação apenas (sub formulário).
Obrigado e desculpe.

Amigo, com esse Codigo, selecionei:

Tipo Artigo: Portatil
Avaria: Nao Liga

E o Relatório abriu somente com esses itens...

Private Sub Comando27_Click()
Dim strDocName As String
Dim strWhere As String
   strDocName = "Ficha"
   strWhere = "[Tipo de artigo] ='" & [Artigos Subformulário].Form![Tipo de artigo] & "' AND Avaria = '" & [Reparações Subformulário].Form![Avaria] & "'"
   DoCmd.OpenReport strDocName, acPreview, , strWhere
End Sub

Está perfeito, nem sei como agradecer
Tentei meter o mesmo código quando clicar 2x no número da reparação, mas não funciona.
É possível?
Torna-se mais fácil clicar 2x no número da reparação que no botão, porque assim temos a certeza que seleccionamos o correcto.
Muito obrigado pela sua ajuda.