کد برای menu>tools>option>view>hidden object

[lorzadehj]

با سلام خدمت اساتید
بدون مقدمه کد برای مسیر menu>tools>option>view>hidden object را می خواهم که بشود no یا off کرد
البته لطفا
با تشکر فراوان

[Abbas Amiri]

سلام
روال زیر را دریک ماژول کپی کنید و از هرجا خواستید صدا بزنید


Sub ShowPane(blnShow As Boolean)
DoCmd.SelectObject acTable, , True
If Not blnShow Then
DoCmd.RunCommand acCmdWindowHide
End If
End Sub





ShowPane True
ShowPane False

[lorzadehj]

با سلام جناب امیری
بازهم مزاحم همیشگی سوال داره
با عرض شرمندگی کد فوق آدرس menu>tools>option>view>hidden object نیست
میشه لطفا دقیقا همون کد آدرس رو برام بنویسید
با تشکر فراوان