Доступ к VBA для открытия / активации таблицы базы данных

Question

У меня есть открытая база данных MS Access с 20 таблицами, показанными слева, и двумя открытыми вкладками, показывающими содержимое двух таблиц. Я пытаюсь написать код vba для 1) выбора / активации одной из уже открытых вкладок и 2) открытия новой вкладки для одной из таблиц слева, которая еще не открыта.

Я просмотрел множество примеров, но все они говорят о формах, а не о вкладках / вкладках, с которыми я хочу работать в основном отображении таблицы Access. Вот мой код - я могу узнать имя таблицы, но не могу понять, как открыть и активировать вкладку для таблицы на дисплее Access.

Sub ActivateCommandsTable()
 ' activate or open a tab for the Commands table
 Dim tbl As AccessObject, db As Object
 Set db = Application.CurrentData

 ' Search for open AccessObject objects in AllTables collection.
 For Each tbl In db.AllTables

 If tbl.IsLoaded = True Then
    ' Print name of the table
    Debug.Print tbl.name
    If tbl.name = "Commands" Then

        ' I need some code here to activate/open the table tab

        Exit Sub
    End If
 End If

 Next tbl
End Sub

Answer 1

Просто используйте DoCmd.OpenTable.

DoCmd.OpenTable tbl.Name