Solved

access navigation pane hide with vba

Posted on 2010-08-27
9
1,268 Views
Last Modified: 2013-11-28
Hello,

Is there any way in access 2007 to hide  navigation pane with VBA, and without need to restart the database?

Thanks
0
Comment
Question by:JoeBlack1980
[X]
Welcome to Experts Exchange

Add your voice to the tech community where 5M+ people just like you are talking about what matters.

  • Help others & share knowledge
  • Earn cash & points
  • Learn & ask questions
  • 3
  • 2
  • 2
  • +2
9 Comments
 
LVL 18

Accepted Solution

by:
Cluskitt earned 250 total points
ID: 33541447
0
 

Author Comment

by:JoeBlack1980
ID: 33541612
hello,
it works very well in example db , however when i use it on mine, it shows navigation panel, then on hide, it hides the window on which i use the button.
Any ideA?
0
 
LVL 48

Expert Comment

by:Dale Fye (Access MVP)
ID: 33541880
see the accepted solution here.
0
Ransomware-A Revenue Bonanza for Service Providers

Ransomware – malware that gets on your customers’ computers, encrypts their data, and extorts a hefty ransom for the decryption keys – is a surging new threat.  The purpose of this eBook is to educate the reader about ransomware attacks.

 
LVL 31

Assisted Solution

by:Helen Feddema
Helen Feddema earned 125 total points
ID: 33542154
I use these little procedures:
Public Function ShowNavPane()

   DoCmd.SelectObject objecttype:=acTable, indatabasewindow:=True
   
End Function

Public Function HideNavPane()

   DoCmd.RunCommand acCmdWindowHide

End Function

Open in new window

0
 
LVL 31

Expert Comment

by:Helen Feddema
ID: 33542160
They are functions so they can be run from hot keys in the AutoKeys macro, for convenience.
0
 
LVL 74

Assisted Solution

by:Jeffrey Coachman
Jeffrey Coachman earned 125 total points
ID: 33542566
"however when i use it on mine,"
Is your form "Pop up" property set to: Yes?
0
 

Author Comment

by:JoeBlack1980
ID: 33574902
Ok ,
Thanks all for the replied,
For anyone who will visit this question later on  , I had to combine all the replies so it goes like that.
I use the form in the 1st reply, i set up the property to PopUp.
Then in another window , i make a button which uses the following code
DoCmd.OpenForm "form11"
DoCmd.Close acForm, "form11", acSaveNo
And i set the Form_Load event code of form11 as following>
Private Sub Form_Load()
DoCmd.SelectObject objecttype:=acTable, indatabasewindow:=True
DoCmd.RunCommand acCmdWindowHide
End Sub
 That way , the button i created open form11 which hides navisgationpane, and then later it close form11
It's kind of walktrough, but it works fine for me
Thanks all
0
 

Author Closing Comment

by:JoeBlack1980
ID: 33574912
Had to use multi replies to get one final solution.But thanks everybody.
0
 
LVL 74

Expert Comment

by:Jeffrey Coachman
ID: 33577719
"Had to use multi replies to get one final solution"= Collaboration

;-)

Jeff
0

Featured Post

Independent Software Vendors: We Want Your Opinion

We value your feedback.

Take our survey and automatically be enter to win anyone of the following:
Yeti Cooler, Amazon eGift Card, and Movie eGift Card!

Question has a verified solution.

If you are experiencing a similar issue, please ask a related question

Describes a method of obtaining an object variable to an already running instance of Microsoft Access so that it can be controlled via automation.
Phishing attempts can come in all forms, shapes and sizes. No matter how familiar you think you are with them, always remember to take extra precaution when opening an email with attachments or links.
Get people started with the utilization of class modules. Class modules can be a powerful tool in Microsoft Access. They allow you to create self-contained objects that encapsulate functionality. They can easily hide the complexity of a process from…
Basics of query design. Shows you how to construct a simple query by adding tables, perform joins, defining output columns, perform sorting, and apply criteria.

696 members asked questions and received personalized solutions in the past 7 days.

Join the community of 500,000 technology professionals and ask your questions.

Join & Ask a Question