How do I print the tab order list?

[Wes from Scottsdale]

I have well over 100 controls on a form. It would be very helpful if I could
print the tab order list, rather than have to figure it out in that tiny
window.

Any ideas?

 

[fredg]

I have well over 100 controls on a form. It would be very helpful if I could
print the tab order list, rather than have to figure it out in that tiny
window.

Any ideas?

Paste this into a module.
Change "FormName" to whatever the actual name is of your form.
Run it.

Public Sub ShowTabOrder()

' Will show the TabOrder value for each control on the specified form.
Dim ctl As Control
DoCmd.OpenForm "FormName", acDesign, , , , acHidden
On Error Resume Next
For Each ctl In Forms("FormName")
Debug.Print ctl.Name & " " & ctl.Properties("TabIndex").Value
Next
DoCmd.Close acForm, "FormName", acSaveNo

End Sub