vhung
Member
- Local time
- Today, 00:03
- Joined
- Jul 8, 2020
- Messages
- 235
>when you need to open you ribbon and navigation pane
>try the codes below
DoCmd.SelectObject acTable, , True
If Not (objPane Is Nothing) Then
objPane.IsCollapsed = False
End If
DoCmd.ShowToolbar "Ribbon", acToolbarYes 'Yes or 'No
MsgBox "Ribbon, acToolbarYes; NavigationPane OpenYes"
>no need to restart this time auto response is visible
>try the codes below
DoCmd.SelectObject acTable, , True
If Not (objPane Is Nothing) Then
objPane.IsCollapsed = False
End If
DoCmd.ShowToolbar "Ribbon", acToolbarYes 'Yes or 'No
MsgBox "Ribbon, acToolbarYes; NavigationPane OpenYes"
>no need to restart this time auto response is visible
Attachments
Last edited: