Welcome to Experts Exchange

Add your voice to the tech community where 5M+ people, just like you, are talking about what matters.

  • Help others & share knowledge
  • Earn cash & points
  • Learn & ask questions
Solved

Print screen of an Access Form

Posted on 2011-03-24
5
1,816 Views
Last Modified: 2012-08-14
I would like to "print screen" an Access form and print it.  I don't want to "print screen" the entire screen but would like to designate the coordinates of the screen that makes up the form.  My objective is to print exactly what I see on the screen.  Is it possible to do through VBA?
0
Comment
Question by:marku24
  • 2
  • 2
5 Comments
 
LVL 44

Expert Comment

by:GRayL
ID: 35211092
use Alt+PrintScreen

then copy to something like WordPad, save it, and use it from there.
0
 
LVL 84

Accepted Solution

by:
Scott McDaniel (Microsoft Access MVP - EE MVE ) earned 200 total points
ID: 35211267
You're referring to a "screen capture"? Where you take a screenshot of whatever is on the screen? If so, see this page:

http://word.mvps.org/faqs/macrosvba/PrtSc.htm

It's listed as Word, but it will work in Access.

If you're trying to print the data that's in that form, then you should build a Report and print that.
0
 
LVL 5

Assisted Solution

by:DoveTails
DoveTails earned 50 total points
ID: 35211820
Something I saved from a web site that may be useful.........
Insert a new module and paste the following to create a "ScreenCapture" procedure:
'===========================================
Option Compare Database
Private Declare Sub keybd_event Lib "user32" (ByVal bVk As Byte, ByVal _
 bScan As Byte, ByVal dwFlags As Long, ByVal dwExtraInfo As Long)

Private Const KEYEVENTF_KEYUP = &H2
Private Const VK_SNAPSHOT = &H2C
Private Const VK_MENU = &H12

Sub ScreenCapture()
 keybd_event VK_MENU, 0, 0, 0
 keybd_event VK_SNAPSHOT, 0, 0, 0
 keybd_event VK_SNAPSHOT, 0, KEYEVENTF_KEYUP, 0
 keybd_event VK_MENU, 0, KEYEVENTF_KEYUP, 0
End Sub
'=============================================

Add a command button to your form and on the click event type:
  ScreenCapture

This will paste your active window to your clip board (you can paste into Word to see what you have)
I can only get your active window to the clipboard ... not sure how to print from there.

Hope that helps.
0
 
LVL 44

Expert Comment

by:GRayL
ID: 35212163
Egg on my face:  I forgot about this a long time ago.  When in the Desktop, Alt+PrintScreen will capture the window with the focus - PrintScreen will capture the whole desktop.  For some reason, strange or otherwise, when in Access, they both do the same thing - the whole desktop.  Looks like DoveTails has the solution.
0
 
LVL 84
ID: 35212376
Actually, the code supplied by DoveTails is nearly identical to the code at the link I provided.
0

Featured Post

Simplifying Server Workload Migrations

This use case outlines the migration challenges that organizations face and how the Acronis AnyData Engine supports physical-to-physical (P2P), physical-to-virtual (P2V), virtual to physical (V2P), and cross-virtual (V2V) migration scenarios to address these challenges.

Question has a verified solution.

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

In a multiple monitor setup, if you don't want to use AutoCenter to position your popup forms, you have a problem: where will they appear?  Sometimes you may have an additional problem: where the devil did they go?  If you last had a popup form open…
It’s the first day of March, the weather is starting to warm up and the excitement of the upcoming St. Patrick’s Day holiday can be felt throughout the world.
With Microsoft Access, learn how to specify relationships between tables and set various options on the relationship. Add the tables: Create the relationship: Decide if you’re going to set referential integrity: Decide if you want cascade upda…
Polish reports in Access so they look terrific. Take yourself to another level. Equations, Back Color, Alternate Back Color. Write easy VBA Code. Tighten space to use less pages. Launch report from a menu, considering criteria only when it is filled…

765 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