In your code you have these two lines.
stDocName = "SupplierForm1"
DoCmd.OpenForm stDocName, , , stLinkCriteria
Just add this after them.
DoCmd.Close acForm, Me.Name
That should close the open form just after your new form has opened and taken focus.
Hope this is some help. :-)