ทำไมไม่สั่งปิดทุกฟอร์มแล้วเปิดใหม่เรียงตามฟอร์มที่ต้องการครับ
Dim obj As AccessObject, dbs As Object
Set dbs = Application.CurrentProject
For Each obj In dbs.AllForms
If obj.IsLoaded = True Then
DoCmd.Close acForm, obj.Name, acSaveYes
End If
Next obj
'เรียงตามลำดับที่ต้องการ
DoCmd.OpenForm "FormA"
DoCmd.OpenForm "FormB"
DoCmd.OpenForm "FormC"
ปล.ไม่รู้ว่าใช่คำตอบมั้ย