Define Current Subform Record in VBA Code

[paquer]

Im trying to sort out all subform records except for the new record
created via a cmd on the main form.
The command creates the new record, autofills some fields, then the PK
value is autoassigned. I want the previous records listed to be
filtered out. Although thats what I cant get by. The filter wont work
no matter how I put it in. This is how I have it currently.

Here's the code;

Private Sub Create_Job_Click()
Me.Field_Form_Sub_New.Visible = True
Me.Field_Form_Sub_New.Form.AllowAdditions = True
Me.Field_Form_Sub_New.SetFocus
DoCmd.GoToRecord , , acNewRec

Field_Form_Sub_New!Township = Forms!Jobs_Active!TWP
Field_Form_Sub_New!Property = Forms!Jobs_Active!Property
Field_Form_Sub_New!PropertyCode = Forms!Jobs_Active![Property
Code]
Field_Form_Sub_New!SeasonalAccess = Forms!Jobs_Active![Seasonal
Access]
Field_Form_Sub_New![Job Request] = Forms!Jobs_Active![Current
Request]
DoCmd.ApplyFilter , Me.Form.CurrentRecord
End Sub

Ive been trying to apply the filter after the fields are autofilled
because as far as i can tell the PK Value (Autonumber) is not assigned
until the record contains data.
Can I find out what the assigned Autonumber in the code, then filter
on its actual value?
Any help would be greatly appreciated.