Sample File Download: Hide_Show_Ribbon Zip File (20 KB)
প্রথমে
MS Access এ একটি নতুন ফাইল
নিন। একটি
Form ও Form এ চারটি Command button নিন।
উপরের ছবির মত করে
সাজিয়ে বাটনগুলোর নাম দিন।
Show Ribbon button এর কোড:
DoCmd.ShowToolbar "Ribbon", acToolbarYes
Hide Ribbon button এর কোড:
DoCmd.ShowToolbar "Ribbon", acToolbarNo
Show Navigation Pane button এর কোড:
Call DoCmd.SelectObject(acTable, , True)
Hide Navigation Pane button এর কোড:
Call DoCmd.NavigateTo("acNavigationCategoryObjectType")
Call DoCmd.RunCommand(acCmdWindowHide)
নিচের
Screenshot এ কোডগুলো দেওয়া আছে।
Private Sub cmdHideNavPane_Click()
Call
DoCmd.NavigateTo("acNavigationCategoryObjectType")
Call
DoCmd.RunCommand(acCmdWindowHide)
End Sub
Private Sub cmdHideRibbon_Click()
DoCmd.ShowToolbar "Ribbon", acToolbarNo
End Sub
Private Sub cmdShowNavPane_Click()
Call
DoCmd.SelectObject(acTable, , True)
End Sub
Private Sub cmdShowRibbon_Click()
DoCmd.ShowToolbar "Ribbon", acToolbarYes
End Sub
Hide Ribbon ও
Hide Navigation Pane এর কোড Startup Form এর “On Load” event লিখলে যখন ফাইলটি
ওপেন করবেন তখন Ribbon ও
Navigation Pane hide হয়ে
যাবে।
Nice tricks....Carry on.
ReplyDeleteDear..when we open . i mean reopen it so so ribbons are visible .. Then we click on hide ribben then hidden .. I want that when i visible it then unhide . but how i can this
ReplyDelete