How do I test for which tab is active in VBA?

[Seth Schrock]

I have a Select All check box on one of my databases. It currently runs an update query that selects or unselects all of the records in a subform. I now have two subforms on separate tabs in a tab control. I would like to be able to have the Select All checkbox know which tab is visible and do the selecting/unselecting on just that form. I initially thought I would test for which tab had the focus, but I immediately realized that once I click on the Select All checkbox, no tab has focus. Is there a way to test which tab is active/visible?

[Rabbit]

Me.tabControlName returns the index of the tab that is active.

[Seth Schrock]

So I could do something like:

If Me.tabControlName = "Devices_tab" Then 'the name of one of my tabs
    'Do something
Else
    'Do something else
End If

[Rabbit]

Almost but not quite, it's the tab number starting at 0. If you want the name, you will have to use the tab number to get it from the pages collection and then get the name from that.

[NeoPa]

Rabbit:
Me.tabControlName returns the index of the tab that is active.

Surely that returns a Page object Rabbit? I can't see how this can work. Am I missing something?

[Rabbit]

I'll admit the behavior is a bit odd. But if you MsgBox the control or Debug.Print it, it shows you a number, the number of the tab that is on top.

[Seth Schrock]

It works. I never would have guessed that, but I can't argue with the results. Thanks rabbit.

[NeoPa]

Sorry. My bad. It's the TabControl you're printing rather than the Page itself. The TabControl has a default property called .Value which reflects which of its Pages is currently selected. Much like a Frame returns a value representing which of the Options within it is currently selected.