I have a print button on a SubForm and when pressed it prints all the Records in the subform...

Any idea who to resolve this.

John H.

What exactly do you want it to print?
If it is the current record then you need to include a WHERE condition to uniquely identify that record and that form.

DoCmd.OpenReport "NyReport", acViewPreview,,"[MyID]=[Forms]![MainForm]![Subform]![MyID]"

HTH