Kamis, 21 Januari 2021

Re: [MSAccessProfessionals] 2013 Hide Database window

Thanks Bill,
I'll give this a try!
Regards, 
Patty


On Jan 21, 2021, at 7:31 PM, Bill Mosca <wrmosca@myself.com> wrote:

On Thu, Jan 21, 2021 at 07:57 AM, Patricia Mapes wrote:
Hi,
Does anyone have a good solution for hiding the database windows for access apps.
I would prefer a startup solution but in desperate times I could go firm to form.
Thank you,
Patty
Hi Patty

Here's another way. Call this public function using True argument to show and False argument to hide.
Public Function ShowHideNavPane(bolShow As Boolean)
'Purpose  : Show or hide Nav Pane.
'DateTime : 11/23/2020 11:34
'Author   : Bill Mosca
'Params   : bolShow True=show; False=hide
 
    'Need to select any table in Nav Pane before you can hide it.
    If bolShow = False Then
        DoCmd.SelectObject acTable, , True
        DoCmd.RunCommand acCmdWindowHide
    Else
        DoCmd.SelectObject acTable, , True
    End If
 
End Function

 
--
Regards,
Bill Mosca, Founder - MS_Access_Professionals
Microsoft Office Access MVP 2010-2016
My nothing-to-do-with-Access blog
 

Tidak ada komentar:

Posting Komentar