Print area

J

Jez

I have a number of sheets in a workbook that require
certain users to print certain areas. Many of the users
are not used to working with excel and need just one
button to press. Can anybody give me the script for print
area. The button will be on a different page to the print
area.

Cheers

Jez
 
F

Frank Kabel

Hi
one way:
record a macro:
- goto 'Tools - Macro - Record macro'
- do your stuff :)
- stop the recording

Now you can ssign this code to a button or invoke it from the macro
menu
 
F

Frank Kabel

Hi
it would :)
try the following
- put a button on your other sheet
- insert the following code for the click event of this button (change
the worksheet name and the range definition to your needs)

----
Dim wks as worksheet
set wks = Activeworkbook.worksheets("Print_Sheet")
wks.PageSetup.PrintArea = "$A$1:$D$17"
wks.PrintOut Copies:=1, Collate:=True
 
G

Guest

Thanks....
Worked like a charm....

-----Original Message-----
Hi
it would :)
try the following
- put a button on your other sheet
- insert the following code for the click event of this button (change
the worksheet name and the range definition to your needs)

----
Dim wks as worksheet
set wks = Activeworkbook.worksheets("Print_Sheet")
wks.PageSetup.PrintArea = "$A$1:$D$17"
wks.PrintOut Copies:=1, Collate:=True
----




--
Regards
Frank Kabel
Frankfurt, Germany


.
Click to expand...
 
Top