1. Set focus to the subform control.
2. Set focus to some control in the subform.
3. Go to new record.
This kind of thing:
With Me[NameOfYourSubformControlHere]
.SetFocus
.Form![SomeControlNameHere].SetFocus
If Not .Form.NewRecord Then
RunCommand acCmdRecordsGotoNew
End If
End With