অনেক দিন পর টেকটিউনস এ লিখতে বসলাম। Access, Excel নিয়ে Basic level এ অনেক টিউন আছে, তাই আমি বরাবরই একটু Advance level tune করার চেষ্টা করি। আমার টিউন থেকে যদি কেউ কিছু হলেও শিখতে পারে, তবেই টিউন করাটা সফল হবে। এখন আশাকরি তখন চালাতে গেলে এই Ribbon ও Navigation Pane উপরে ও বামে থেকে যায় যা দেখতে একটু অসুন্দর লাগে। তাই কিভাবে এই Ribbon ও Navigation Pane হাইড করা যায়, আজাকের টিউনে তাই দেখাব।

Sample File Download: Hide_Show_Ribbon Zip File

প্রথমে 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 হয়ে যাবে।

বুঝতে কোথাও সমস্যা হলে মেইল করবেন। [email protected]