ACCESS TIPS タブコントロールのページをVBAから変更する

タブコントロールのページをVBAから変更する

スポンサードリンク

1ページ目ならば、TabPageMove 0 になります。

Private Sub TabPageMove(nPg As Integer)
    Dim tTab As Control
    Dim tPage As Page

'タブコントロール名はタブ2としています
    Set tTab = Me!タブ2
    Set tPage = tTab.Pages(nPg)
    tPage.SetFocus
    Set tTab = Nothing
    Set tPage = Nothing
End Sub

Access-Access!