Как программно нажать кнопку?

Private Sub Кнопка35_Click()
On Error GoTo Err_Кнопка35_Click

Forms![Состояние_ТЕ-сцепка_редактировать]![Сцепка-подчиненная_форма].Form![Состояние_ТЕ-подчиненная форма].Form.Кнопка22_Click
'    DoCmd.DoMenuItem acFormBar, acEditMenu, 8, , acMenuVer70

'    DoCmd.DoMenuItem acFormBar, acEditMenu, 6, , acMenuVer70


Exit_Кнопка35_Click:
    Exit Sub

Err_Кнопка35_Click:
    MsgBox Err.Description
    Resume Exit_Кнопка35_Click
    
End Sub

Public Sub Кнопка22_Click()
On Error GoTo Err_Кнопка22_Click

    DoCmd.DoMenuItem acFormBar, acEditMenu, 8, , acMenuVer70
    DoCmd.DoMenuItem acFormBar, acEditMenu, 6, , acMenuVer70

Exit_Кнопка22_Click:
    Exit Sub

Err_Кнопка22_Click:
    MsgBox Err.Description
    Resume Exit_Кнопка22_Click
    
End Sub