| Home |
| Search |
| Today's Posts |
|
#1
Posted to microsoft.public.excel.programming
|
|||
|
|||
Hide / Unhide Workshets on Print and Open
I have two worksheets in a file that I'd like to unhide when the file is
opened and I'd like to hide them prior to printing since they should not be printed when "print entire workbook" is chosen. They are named VAV Data and FPB Data. They may or may not be hidden when the file is closed. Thanks |
|
#2
Posted to microsoft.public.excel.programming
|
|||
|
|||
|
Hide / Unhide Workshets on Print and Open
Try this on the Thisworkbook code module:
Private Sub Workbook_BeforePrint(Cancel As Boolean) Cancel = True 'hide the sheets Sheets("VAV Data").Visible = xlSheetVisible Sheets("FPB Data").Visible = xlSheetVisible With Application .EnableEvents = False .Dialogs(xlDialogPrint).Show .EnableEvents = True End With 'show the sheets Sheets("VAV Data").Visible = xlSheetVisible Sheets("FPB Data").Visible = xlSheetVisible End Sub Private Sub Workbook_Open() 'show the sheets Sheets("VAV Data").Visible = xlSheetVisible Sheets("FPB Data").Visible = xlSheetVisible End Sub -- Hope that helps. Vergel Adriano "Mr. Matt" wrote: I have two worksheets in a file that I'd like to unhide when the file is opened and I'd like to hide them prior to printing since they should not be printed when "print entire workbook" is chosen. They are named VAV Data and FPB Data. They may or may not be hidden when the file is closed. Thanks |
|
#3
Posted to microsoft.public.excel.programming
|
|||
|
|||
|
Hide / Unhide Workshets on Print and Open
Correction.
This part of the code: 'hide the sheets Sheets("VAV Data").Visible = xlSheetVisible Sheets("FPB Data").Visible = xlSheetVisible should be like this: 'hide the sheets Sheets("VAV Data").Visible = xlSheetHidden Sheets("FPB Data").Visible = xlSheetHidden -- Hope that helps. Vergel Adriano "Vergel Adriano" wrote: Try this on the Thisworkbook code module: Private Sub Workbook_BeforePrint(Cancel As Boolean) Cancel = True 'hide the sheets Sheets("VAV Data").Visible = xlSheetVisible Sheets("FPB Data").Visible = xlSheetVisible With Application .EnableEvents = False .Dialogs(xlDialogPrint).Show .EnableEvents = True End With 'show the sheets Sheets("VAV Data").Visible = xlSheetVisible Sheets("FPB Data").Visible = xlSheetVisible End Sub Private Sub Workbook_Open() 'show the sheets Sheets("VAV Data").Visible = xlSheetVisible Sheets("FPB Data").Visible = xlSheetVisible End Sub -- Hope that helps. Vergel Adriano "Mr. Matt" wrote: I have two worksheets in a file that I'd like to unhide when the file is opened and I'd like to hide them prior to printing since they should not be printed when "print entire workbook" is chosen. They are named VAV Data and FPB Data. They may or may not be hidden when the file is closed. Thanks |
|
#4
Posted to microsoft.public.excel.programming
|
|||
|
|||
|
Hide / Unhide Workshets on Print and Open
Excellent. Thanks a lot.
Is there any way to print those sheets that I hide if I want to review the data on them? I can disallow the macro when I open the file, but is there a way to do it from within Excel? Thanks "Vergel Adriano" wrote: Correction. This part of the code: 'hide the sheets Sheets("VAV Data").Visible = xlSheetVisible Sheets("FPB Data").Visible = xlSheetVisible should be like this: 'hide the sheets Sheets("VAV Data").Visible = xlSheetHidden Sheets("FPB Data").Visible = xlSheetHidden -- Hope that helps. Vergel Adriano "Vergel Adriano" wrote: Try this on the Thisworkbook code module: Private Sub Workbook_BeforePrint(Cancel As Boolean) Cancel = True 'hide the sheets Sheets("VAV Data").Visible = xlSheetVisible Sheets("FPB Data").Visible = xlSheetVisible With Application .EnableEvents = False .Dialogs(xlDialogPrint).Show .EnableEvents = True End With 'show the sheets Sheets("VAV Data").Visible = xlSheetVisible Sheets("FPB Data").Visible = xlSheetVisible End Sub Private Sub Workbook_Open() 'show the sheets Sheets("VAV Data").Visible = xlSheetVisible Sheets("FPB Data").Visible = xlSheetVisible End Sub -- Hope that helps. Vergel Adriano "Mr. Matt" wrote: I have two worksheets in a file that I'd like to unhide when the file is opened and I'd like to hide them prior to printing since they should not be printed when "print entire workbook" is chosen. They are named VAV Data and FPB Data. They may or may not be hidden when the file is closed. Thanks |
|
#5
Posted to microsoft.public.excel.programming
|
|||
|
|||
|
Hide / Unhide Workshets on Print and Open
You can use a macro like the one below. It turns off events then shows the
print dialog without hiding any of your data sheets.. Sub SpecialPrint() With Application .EnableEvents = False .Dialogs(xlDialogPrint).Show .EnableEvents = True End With End Sub -- Hope that helps. Vergel Adriano "Mr. Matt" wrote: Excellent. Thanks a lot. Is there any way to print those sheets that I hide if I want to review the data on them? I can disallow the macro when I open the file, but is there a way to do it from within Excel? Thanks "Vergel Adriano" wrote: Correction. This part of the code: 'hide the sheets Sheets("VAV Data").Visible = xlSheetVisible Sheets("FPB Data").Visible = xlSheetVisible should be like this: 'hide the sheets Sheets("VAV Data").Visible = xlSheetHidden Sheets("FPB Data").Visible = xlSheetHidden -- Hope that helps. Vergel Adriano "Vergel Adriano" wrote: Try this on the Thisworkbook code module: Private Sub Workbook_BeforePrint(Cancel As Boolean) Cancel = True 'hide the sheets Sheets("VAV Data").Visible = xlSheetVisible Sheets("FPB Data").Visible = xlSheetVisible With Application .EnableEvents = False .Dialogs(xlDialogPrint).Show .EnableEvents = True End With 'show the sheets Sheets("VAV Data").Visible = xlSheetVisible Sheets("FPB Data").Visible = xlSheetVisible End Sub Private Sub Workbook_Open() 'show the sheets Sheets("VAV Data").Visible = xlSheetVisible Sheets("FPB Data").Visible = xlSheetVisible End Sub -- Hope that helps. Vergel Adriano "Mr. Matt" wrote: I have two worksheets in a file that I'd like to unhide when the file is opened and I'd like to hide them prior to printing since they should not be printed when "print entire workbook" is chosen. They are named VAV Data and FPB Data. They may or may not be hidden when the file is closed. Thanks |
| Reply |
| Thread Tools | Search this Thread |
| Display Modes | |
|
|
Similar Threads
|
||||
| Thread | Forum | |||
| Hide/Unhide | Excel Discussion (Misc queries) | |||
| hide/unhide | Excel Discussion (Misc queries) | |||
| Macro to Paste Items to All but Several Workshets | Excel Programming | |||
| Hide Unhide | Excel Discussion (Misc queries) | |||
| Hide, Print, Unhide Rows | Excel Programming | |||
Linear Mode
