?
Solved

VB Code to Maximize the 2007 RIbbon

Posted on 2009-04-24
4
Medium Priority
?
446 Views
Last Modified: 2013-11-27
I know I can do this by right clicking the ribbon and selecting Maximize, but was wondering if there is code to do this.
0
Comment
Question by:davnao
  • 2
4 Comments
 
LVL 75
ID: 24226972
I don't have A2007 but I have a dozen links on A2007 Ribbons ... would you like them?

mx
0
 

Author Comment

by:davnao
ID: 24227924
Yes DatabaseMX, please send
0
 
LVL 74

Expert Comment

by:Jeffrey Coachman
ID: 26057707
FWIW:

SendKeys "^{F1}"
0
 

Accepted Solution

by:
davnao earned 0 total points
ID: 26200019
Here is what I used to be able to Show and Hide the ribbon, each assigned to it's own button.

Private Sub cmdRibbonOff_Click()
    DoCmd.ShowToolbar "Ribbon", acToolbarNo
End Sub

Private Sub cmdRibbonOn_Click()
    DoCmd.ShowToolbar "Ribbon", acToolbarYes
End Sub

Open in new window

0

Featured Post

Concerto's Cloud Advisory Services

Want to avoid the missteps to gaining all the benefits of the cloud? Learn more about the different assessment options from our Cloud Advisory team.

Question has a verified solution.

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

Explore the ways to Unlock VBA Project Password Excel 2010 & 2013 documents. Go through the article and perform the steps carefully to remove VBA Excel .xls file.
If you’re using QODBC to update QuickBooks data from Microsoft® Access but Access is not showing the updated data, you could have set up QODBC incorrectly.
In Microsoft Access, learn the trick to repeating sub-report headings at the top of each page. The problem with sub-reports and headings: Add a dummy group to the sub report using the expression =1: Set the “Repeat Section” property of the dummy…
Visualize your data even better in Access queries. Given a date and a value, this lesson shows how to compare that value with the previous value, calculate the difference, and display a circle if the value is the same, an up triangle if it increased…

840 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