dhutch75
10-16-2012, 08:43 AM
I'm attempting to hide the Ribbon in Access 2010 (Windows 7) when opening my app with the following code. I need to support legacy users with Access 2003 as well as Access 2010.
'**************************************************************
Private Sub Form_Load()
'**************************************************************
If SysCmd(acSysCmdAccessVer) > 11 Then 'Access 2003 = 11.0
docmd.showtoolbar "Ribbon", acToolbarNo
End If
End Sub
The code is associated with the Switchboard form that opens at Startup. This works properly when I manually open the form, but not when it opens automatically it by launching the app.
I've tried adding this code to the Open, Load, Resize, and Current events for the form, all with the same results.
Any ideas?
'**************************************************************
Private Sub Form_Load()
'**************************************************************
If SysCmd(acSysCmdAccessVer) > 11 Then 'Access 2003 = 11.0
docmd.showtoolbar "Ribbon", acToolbarNo
End If
End Sub
The code is associated with the Switchboard form that opens at Startup. This works properly when I manually open the form, but not when it opens automatically it by launching the app.
I've tried adding this code to the Open, Load, Resize, and Current events for the form, all with the same results.
Any ideas?