| Home |
| Search |
| Today's Posts |
|
#1
Posted to microsoft.public.excel.programming
|
|||
|
|||
Honoring page setup of each worksheet
Hello all and thanks in advance for your help. I have some code which will
print out every "visible" worksheet within the workbook. My issue is that eash sheet has unique print set up properties which are ignored when my code runs. I would like to avail myself of the features of the code below while augmenting it with assuming the print properties already uniquely associated with each page. Thanks again! Dim sht Application.ScreenUpdating = False For Each sht In Sheets If sht.Visible Then sht.Select Replace:=False Next ActiveWindow.SelectedSheets.PrintOut copies:=1 ActiveSheet.Select Application.ScreenUpdating = True |
|
#2
Posted to microsoft.public.excel.programming
|
|||
|
|||
|
Honoring page setup of each worksheet
I have an idea that might work... before I given an answer,
can you please describe a few of these "unique print set up properties"??? I just want an example of which print properties you have for some of your sheets. thankx. "Walt Herman" wrote in message ... Hello all and thanks in advance for your help. I have some code which will print out every "visible" worksheet within the workbook. My issue is that eash sheet has unique print set up properties which are ignored when my code runs. I would like to avail myself of the features of the code below while augmenting it with assuming the print properties already uniquely associated with each page. Thanks again! Dim sht Application.ScreenUpdating = False For Each sht In Sheets If sht.Visible Then sht.Select Replace:=False Next ActiveWindow.SelectedSheets.PrintOut copies:=1 ActiveSheet.Select Application.ScreenUpdating = True |
|
#3
Posted to microsoft.public.excel.programming
|
|||
|
|||
|
Honoring page setup of each worksheet
I have an idea that might work... before I given an answer,
can you please describe a few of these "unique print set up properties"??? I just want an example of which print properties you have for some of your sheets. thankx. "Walt Herman" wrote in message ... Hello all and thanks in advance for your help. I have some code which will print out every "visible" worksheet within the workbook. My issue is that eash sheet has unique print set up properties which are ignored when my code runs. I would like to avail myself of the features of the code below while augmenting it with assuming the print properties already uniquely associated with each page. Thanks again! Dim sht Application.ScreenUpdating = False For Each sht In Sheets If sht.Visible Then sht.Select Replace:=False Next ActiveWindow.SelectedSheets.PrintOut copies:=1 ActiveSheet.Select Application.ScreenUpdating = True |
| Reply |
| Thread Tools | Search this Thread |
| Display Modes | |
|
|
Similar Threads
|
||||
| Thread | Forum | |||
| Page Setup when saving a worksheet as a web page | Excel Discussion (Misc queries) | |||
| How do I copy Excel page setup from one worksheet to others? | Excel Discussion (Misc queries) | |||
| Worksheet page setup | Excel Discussion (Misc queries) | |||
| Move / copy worksheet without any changes to the page setup | Excel Discussion (Misc queries) | |||
| copy page setup from worksheet to another within workbook | Excel Worksheet Functions | |||
Linear Mode
