udskrivning af udvalgte poster

Hej
Fra min hovedvindue , "frmTransportReg", har jeg brug for at printe udvalgte poster ud via en  rapport.

Jeg kan bare ikke få det til at virke og guderne skal vide jeg har prøvet mange forskellige ting.

Jeg starter med manuelt at udsøge de poster der er klar til fakturering.

Derefter printer jeg via en knap en post af gangen med denne kode :

Private Sub PrintFakturabilag_Click()

        Me.Refresh
        DoCmd.OpenReport "rapFakturabilag", acViewPreview, , "[RMtrpnr] = " & Me![RMtrpnr]
        DoCmd.PrintOut
        DoCmd.Close
   
End Sub

Er der nogen der kan hjælpe med hvordan koden skal se hvis alle udvalgte poster udskrives.

rapporten hedder "rapFakturabilag"
[RMtrpnr] = er et nummerfelt

Hilsen Knud