Solved

access navigation pane hide with vba

Posted on 2010-08-27
9
1,249 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
  • 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 47

Expert Comment

by:Dale Fye (Access MVP)
ID: 33541880
see the accepted solution here.
0
 
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
Free Trending Threat Insights Every Day

Enhance your security with threat intelligence from the web. Get trending threat insights on hackers, exploits, and suspicious IP addresses delivered to your inbox with our free Cyber Daily.

 
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

Get up to 2TB FREE CLOUD per backup license!

An exclusive Black Friday offer just for Expert Exchange audience! Buy any of our top-rated backup solutions & get up to 2TB free cloud per system! Perform local & cloud backup in the same step, and restore instantly—anytime, anywhere. Grab this deal now before it disappears!

Join & Write a Comment

This article is a continuation or rather an extension from Cascading Combos (http://www.experts-exchange.com/A_5949.html) and builds on examples developed in detail there. It should be understandable alone, but I recommend reading the previous artic…
When you are entering numbers in a speadsheet, and don't remember what 6×7 is, you just type “=6*7" instead. It works in every cell! This is not so in Access. To enter the elusive 42 in a text box, you have to find a calculator, and then copy the re…
Familiarize people with the process of utilizing SQL Server stored procedures from within Microsoft Access. Microsoft Access is a very powerful client/server development tool. One of the SQL Server objects that you can interact with from within Micr…
With Microsoft Access, learn how to start a database in different ways and produce different start-up actions allowing you to use a single database to perform multiple tasks. Specify a start-up form through options: Specify an Autoexec macro: Us…

759 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

Need Help in Real-Time?

Connect with top rated Experts

18 Experts available now in Live!

Get 1:1 Help Now