Lining up Tab Controls on a Form

[RayMilhon]

I have a data entry form in MS Access 2010. There is a Header Section that displays the Record data from the table the form is attached to. In the Detail Section There are 3 Tab Controls. With a total of 13 Tabs. The User Requested that they only scroll up and down not left to right so had to break up the tabs into 3 controls. The issue is that everytime the user clicks on one of the tabs the page changes and the tab name scrolls up where the user can't see it. Is there anyway to stop that?

[June7]

Not sure, maybe have to resize the form.

If you want to provide db for analysis, follow instructions at bottom of my post.

[RayMilhon]

Not sure, maybe have to resize the form.

If you want to provide db for analysis, follow instructions at bottom of my post.

Here it is.

[June7]

I don't really understand the issue. When clicking on lower tab control, the upper one(s) have to scroll up.

To avoid side to side scrolling with 1 tab control, should be able to set tabs for multi-row. Set the tab control Multi-Row property to Yes and UseThemes property to No.
At first I got a horizontal scroll bar on the tab row, not multi-row tabs. Then I ran Compact & Repair and now I get multi-row tabs.

The code for apiGetUserName and apiGetComputerName will error on Windows7 64-bit machines unless you use PtrSafe keyword.

An alternative is the Environ() function.

Environ("USERNAME")
Environ("COMPUTERNAME")

[RayMilhon]

We don't have any 64 bit machines here and there are no plans to get any. We do use Windows 7 so I'll make that change just in case. Thanks. As for the original question. On the tab Control is it possible to make the tabs line up on the left side instead of on the top?

[June7]

No, that option is not available with tab control.

[RayMilhon]

Didn't think so but had to ask

[Missinglinq]

...The issue is that everytime the user clicks on one of the tabs the page changes and the tab name scrolls up where the user can't see it...

I can't run 2010 files and so can't look at this, but frequently what you're describing is caused by two things.

The first, as June7 suggested, is that you need to resize, either the Tabbed Control, or the Form, itself. Truth be told, most experienced developers will tell you that Forms that have to be scrolled, in either direction, are about as user-unfriendly as you can get!

The second cause, in combination with a Form that has to be scrolled vertically, is that the first Control that gets Focus, when clicking on a given Tabbed Page, is located in the lower half of the Form. You can use the OnChange event Tabbed Control to set Focus to a Control near the top of the Page. Here's an example of code for the OnChange; just replace YourTabbedControlName and ControlNearTopName with your actual names for these Controls:

Private Sub YourTabbedControlName_Change()
 
   Select Case YourTabbedControlName 
  
    Case 0  'First Page 
      Me.ControlNearTopName.SetFocus
  
    Case 1  'Second page 
      'Code for Page 2 goes here
  
    Case 2   'Third page
      'Code for Page 3 goes here
  
  End Select

End Sub

This assumes that the Controls you mention are placed directly on the Tabbed Pages (as your description sounds) rather than on a Subform on the Tabbed Pages.

Notice that the Index for Tabbed Pages is Zero-based; the first page is 0, the second page is 1, and so forth.

If a Subform is involved, you'd first have to SetFocus to the Subform Control then use SetFocus for the Control, itself.

Linq ;0)>