Vba bilmekten ziyade yeni bir buton eklediğinizde Access sihirbazı bu işi sizin için yapıyor zaten.
Yeni bir buton eklediğinizde aşağıdaki gibi bir kod ekliyor dilerseniz sihirbaza yaptırın dilerseniz de
Kullanmak istediğiniz butonun tıklandığında olayına

Private Sub Komut2_Click()'Komut2 yazan yerlere butonunuzun adını

On Error GoTo Err_Komut2_Click



 Dim stDocName As String

 Dim stLinkCriteria As String



 stDocName = "Form1" 'Form1 yerine açtırmak istediğiniz form adını yazabilirsiniz.

 DoCmd.OpenForm stDocName, , , stLinkCriteria



Exit_Komut2_Click:

 Exit Sub



Err_Komut2_Click:

 MsgBox Err.Description

 Resume Exit_Komut2_Click

 

End Sub

yazdığınızda istediğiniz formu açacaktır