Problem with hiding Ribbon & Navigation Code

[Greyhound Friend]

I’m a newbie to Access and VB, but have learned a lot from this forum. Thank you.

From what I’ve been able to piece together from the posts here is that the code below should hide the ribbon and navigation pane. Where am I making my mistake?

Any help is greatly appreciated.

Sub HideRibbon()
Dim i As Integer
For i = 1 To CommandBars.Count
DoCmd.ShowToolbar "Ribbon", acToolbarNo


DoCmd.NavigateTo "acNavigationCategoryObjectType"
DoCmd.Minimize
Next i
End Sub

Deb

[June7]

The procedure works.

What event are you using to call the Sub?

[Greyhound Friend]

Thank you for your quick reply! I was trying it from the run command within VB. I want it to run when the database opens. Where would I put that? (Sorry, don't mean to sound so stupid...)

[Greyhound Friend]

I thought about your question some more. A form called Main Menu is opened when the database opens. My thought is that when that form opens, that would be the event the runs the Sub, right? That would also allow me to bypass the Sub by holding the shift key when I open the database. Is my logic right?

[June7]

Hiding the ribbon and Navigation Pane can be accomplished with database Option settings. No code required. Correction, that will hide all but the Home tab. The code actually hides everything. Very interesting.

However, unless you also disable function keys, F11 can expand the Navigation Pane.

[Greyhound Friend]

Thank you. I tried it and like you said, the Home tab remains. How do I run the code...or is that too much to answer here?

[ItsMe]

Placing the following in a form's load event should hide the Backstage

DoCmd.ShowToolbar "Ribbon", acToolbarNo

[Greyhound Friend]

YES! Thank you SO much.

[June7]

Glad you got it working. You had the right idea in post 4.

Did you also disable the function keys in database Option settings? Uncheck "Use Access Special Keys"

[Greyhound Friend]

I did now. Thank you. This forum is an amazing help.