вобщем нужно сделать кнопку для юзера (чтобы он выполнял сжатие/востановление базы)

нашел в FAQе такой пример:

'Для Русскоязычной версии Access'
CommandBars("Menu Bar").Controls("С&ервис"). _
Controls("&Служебные программы").Controls("С&жать и восстановить базу данных"). _
accDoDefaultAction

прицепил к кнопке в результате выпадает сообщение
Object doesn"t support this property or method

причем, что интересно если в то же время сам мышкой лезеш в это же меню ,
то все работает отлично

пробовал еще и так делать

Private Sub Кнопка75_Click()


CommandBars(40).Controls(12). _
Controls(7).Controls(2). _
accDoDefaultAction

End Sub

результат тот же. Подскажите кто знает

что касается сжатия то конечно можно и другим способом воспользоватся.
да я собирался другие кнопочки подобным образом нажымать, жалко конечно что вообще никак нельзя нажать...