Fine-tuning the Zoom Box function in VBA

Posted on 2006-05-12
Medium Priority
Last Modified: 2009-12-16
For memo fields on a form where there's not a lot of room, I often add an "on doubleclick" event that automatically opens Access's built in zoom box...

    DoCmd.RunCommand acCmdZoomBox

...so that the user can see more of the text at once. When the zoom box first opens, though, it displays its text in a default font and point size that's somewhat small. The zoom box has a "Font" button that allows you to manually make the text larger and/or in a different font, but I'm wondering if it's possible to set the properties of the zoom box in VBA so that it automatically displays in a different and/or larger font when it first opens? Thanks in advance.
Question by:rmbonds
LVL 61

Accepted Solution

mbizup earned 500 total points
ID: 16668547
As far as I know, It can't be done through VBA.  This url walks you through making a copy of Utility.MDA and modifying that copy to use the font you need.  For what it's woth, I just tried this and was unable to open the Zoombox for in design view.  You might have better luck:

LVL 38

Expert Comment

ID: 16669155
I agree with Miriam that , according to published sources (see link), there is no way.


However, here is an idea for you if you want to experiment with it. Try using  SendKeys to send the [Shift][F2} to the zoombox.  Try it both ways.
one way:

Private Sub Yourtextbox_doubleclick()
DoCmd.RunCommand acCmdZoomBox
End Sub

the second way:
Private Sub Yourtextbox_doubleclick()
DoCmd.RunCommand acCmdZoomBox
End Sub


Featured Post

How to Use the Help Bell

Need to boost the visibility of your question for solutions? Use the Experts Exchange Help Bell to confirm priority levels and contact subject-matter experts for question attention.  Check out this how-to article for more information.

Question has a verified solution.

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

In Part II of this series, I will discuss how to identify all open instances of Excel and enumerate the workbooks, spreadsheets, and named ranges within each of those instances.
Did you know that more than 4 billion data records have been recorded as lost or stolen since 2013? It was a staggering number brought to our attention during last week’s ManageEngine webinar, where attendees received a comprehensive look at the ma…
Access reports are powerful and flexible. Learn how to create a query and then a grouped report using the wizard. Modify the report design after the wizard is done to make it look better. There will be another video to explain how to put the final p…
Look below the covers at a subform control , and the form that is inside it. Explore properties and see how easy it is to aggregate, get statistics, and synchronize results for your data. A Microsoft Access subform is used to show relevant calcul…
Suggested Courses

850 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