Home |
Search |
Today's Posts |
#1
Posted to microsoft.public.excel.programming
|
|||
|
|||
Code for Printing Hidden Sheets
Hi,
I have a project that includes one main sheet used to collect necessary data and then a number of other sheets that calculate and display the data in reports. I would like to keep all of the report sheets hidden and then be able to print from the main sheet by clicking a command button relating to the sheet. I've tried Sub Print () Sheets("Report_To_Print").PrintOut Copies:=1, Collate:=True End Sub However I get a compile error. Is it possible to print a hidden sheet without making it visible first? Can anybody offer a solution? Thanks for your help, Todd |
#2
Posted to microsoft.public.excel.programming
|
|||
|
|||
Code for Printing Hidden Sheets
Todd,
You need to make the sheet visible first. Application.ScreenUpdating = False With Worksheets("Sheet1") .Visible = xlSheetVisible .PrintOut ' preview:=True .Visible = xlSheetHidden End With Application.ScreenUpdating = True -- Cordially, Chip Pearson Microsoft MVP - Excel Pearson Software Consulting, LLC www.cpearson.com "Todd" wrote in message ... Hi, I have a project that includes one main sheet used to collect necessary data and then a number of other sheets that calculate and display the data in reports. I would like to keep all of the report sheets hidden and then be able to print from the main sheet by clicking a command button relating to the sheet. I've tried Sub Print () Sheets("Report_To_Print").PrintOut Copies:=1, Collate:=True End Sub However I get a compile error. Is it possible to print a hidden sheet without making it visible first? Can anybody offer a solution? Thanks for your help, Todd |
#3
Posted to microsoft.public.excel.programming
|
|||
|
|||
Code for Printing Hidden Sheets
Sub Print ()
Dim lvis as Long Application.ScreenUpdating = False With Sheets("Report_To_Print") lVis = .visible .Visible = True .PrintOut Copies:=1, Collate:=True .visible = lVis End With Application.ScreenUpdating = True End Sub Is a possibility -- Regards, Tom Ogilvy "Todd" wrote in message ... Hi, I have a project that includes one main sheet used to collect necessary data and then a number of other sheets that calculate and display the data in reports. I would like to keep all of the report sheets hidden and then be able to print from the main sheet by clicking a command button relating to the sheet. I've tried Sub Print () Sheets("Report_To_Print").PrintOut Copies:=1, Collate:=True End Sub However I get a compile error. Is it possible to print a hidden sheet without making it visible first? Can anybody offer a solution? Thanks for your help, Todd |
Reply |
Thread Tools | Search this Thread |
Display Modes | |
|
|
Similar Threads | ||||
Thread | Forum | |||
Again printing with hidden rows | Excel Worksheet Functions | |||
Formula or Code to keep Hidden Rows Hidden | Excel Worksheet Functions | |||
Printing hidden worksheets | Excel Discussion (Misc queries) | |||
How to repeat a code for selected sheets (or a contiguous range of sheets) in a Workbook? | Excel Worksheet Functions | |||
Printing hidden comments | Excel Discussion (Misc queries) |