[Resolvido]Formulario com subformulario imprimir relatório

olá boa noite amigos preciso da vossa ajuda se possivel.
Ora é o seguinte tenho um formulario e um subformulario que são vinculados pelas id são alimentados por consultas construi um relatório com os campos do formulario e do subform, criei um botão no formulario para aceder ao relatório e apliquei o seguinte evento que retirei de um post do Sr.Vieira que é o seguinte

Private Sub Comando43_Click()
On Error Resume Next
Dim strDocName As String
Dim strFilter As String
strDocName = "Relatório1"
strFilter = "IDOrdem= Forms!Frm_Ordem!IDOrdem"
DoCmd.OpenReport strDocName, acViewPreview, , strFilter
End Sub

o que está acontecer, quando clico no botão abre o relatório com todos os dados que foram registados no formulario mas no subform só aparece o primeiro registo e no subform tenho mais registos.É neste sentido que peço ajuda para que apareça os restantes registo o subform está como folha de dados
Obrigado

Você criou o subrelatório tendo o subform como origem ou a consulta que alimenta o subform? Caso não seja, tente usar a consulta como origem par ao subrelatório.

faltava o subrelatório muito obrigado pela ajuda.
obrigado