ได้แล้วครับแต่ต้อง สร้างปุ่ม command button แล้วด้วยคำสั่งนี้

Private Sub cmdOldRecord_Click()
    Me.[equipRateStatus715].SetFocus
    DoCmd.GoToRecord , , acGoTo, Me.txtirecord
End Sub

แต่อยากให้มันไปที่เรคคอร์ดที่เราต้องการเมื่อมัน แอคทีฟ ต้องเอาคำสั่งนี้ไปวางไว้ตรงไหน ถึงทำงานได้ครับ

คำว่า แอคทีฟ ของคุณหมายถึงอย่างไรครับ

ประมาณแบบนี้ครับ
Private Sub Form_Activate()

End Sub

งง ???

ก็คุณตอบเองว่าอยู่ใน Form_Active event แล้วทำไมไม่เอาโค้ไปใส่ในนั้นหล่ะครับ

แต่

ก็ยังสงสัยว่าทำไมถึงเลือกใช้ Form_Active event เพราะ event นี้จะเกิดทุกครั้งที่คุณอยู่ที่ฟอร์มอื่น แล้วมาคลิกที่ฟอร์มนี้หน่ะครับ

ข้อ 1. คือผมใช้โค้ดแบบนี้ครับ แล้วมันไม่ทำงาน
Private Sub Form_Activate()
    Me.[equipRateStatus715].SetFocus
    DoCmd.GoToRecord , , acGoTo, Me.txtirecord
End Sub

ข้อ 2. จึงเอาโค้ดนี้ไปใส่ในไว้ในเหตุการณ์ คลิกปุ่มคำสั่ง โค้ดนี้ถึงทำงาน
Private Sub cmdOldRecord_Click()
    Me.[equipRateStatus715].SetFocus
    DoCmd.GoToRecord , , acGoTo, Me.txtirecord
End Sub

ข้อ 3. ที่เลือกใช้ Form_Active event เพราะ ผมใช้คำสั่ง Requery แล้ว เมื่อ Form_Active จะให้มันกลับมา เรคคอร์ดเดิม

อ่านแล้วผมก็ยังไม่เข้าใจอยู่ดี คือต้องการให้ทุกครั้งที่ requery แล้ว ให้มันกลับไปเรคอร์ดเดิมใช่ไหม ถ้าใช่ ผมมองไม่ออกว่ามันต้องไปเกี่ยวอะไรกับการใช้ Active event ด้วย

ทำไมไม่ใส่โค้ดข้างบนไว้หลังบรรทัดที่คุณสั่ง requery หล่ะครับ เช่น

me.requery
Me.[equipRateStatus715].SetFocus
DoCmd.GoToRecord , , acGoTo, Me.txtirecord

อาจารย์ครับ แบบอาจารย์ใช้ได้จริง ๆ ผมลองแล้ว ลองอีก ตั้งหลายวิธี ตั้งนาน ขอบพระคุณมากครับ