Create a Zoom Button (1 Viewer)

[feinj]

Is there any way to create a Zoom Button on a form that will open the Zoom form normally activated by the Ctrl-F2 command while in a text or memo field?

 

[boblarson]

Is there any way to create a Zoom Button on a form that will open the Zoom form normally activated by the Ctrl-F2 command while in a text or memo field?

Yep, the code is:

DoCmd.RunCommand acCmdZoomBox

 

[pbaldy]

I use this in the double click event of the textbox:

DoCmd.RunCommand acCmdZoomBox

 

[boblarson]

Oh, and you probably would need this in the button's click event:

Screen.PreviousControl.SetFocus
DoCmd.RunCommand acCmdZoomBox

 

[feinj]

Thanks again Bob. You are a life saver.

 

[teiben]

This doesn't work in 2010, I put this line on the got focus event, anyone know an alternative command?

 

[missinglinq]

Does any VBA code run? Code does not run in 2007/2010 unless your database resides in a folder that has been declared a “trusted” location.

To trust your folder, click:

1. Office Button (top left)
2. Access Options (bottom of dialog)
3. Trust Center (left)
4. Trust Center Settings (button)
5. Trusted Locations (left)
6. Add new location (button)

Here's a visual for it, courtesy of BTAB Development:

http://www.btabdevelopment.com/ts/default.aspx?PageId=13

Linq ;0)>