Solved

access navigation pane hide with vba

Posted on 2010-08-27
9
1,250 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
Enterprise Mobility and BYOD For Dummies

Like “For Dummies” books, you can read this in whatever order you choose and learn about mobility and BYOD; and how to put a competitive mobile infrastructure in place. Developed for SMBs and large enterprises alike, you will find helpful use cases, planning, and implementation.

 
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

Is Your Active Directory as Secure as You Think?

More than 75% of all records are compromised because of the loss or theft of a privileged credential. Experts have been exploring Active Directory infrastructure to identify key threats and establish best practices for keeping data safe. Attend this month’s webinar to learn more.

Question has a verified solution.

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

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…
A simple tool to export all objects of two Access files as text and compare it with Meld, a free diff tool.
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…
In Microsoft Access, when working with VBA, learn some techniques for writing readable and easily maintained code.

910 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