ExcelBanter

ExcelBanter (https://www.excelbanter.com/)
-   Excel Programming (https://www.excelbanter.com/excel-programming/)
-   -   Mimic Print Preview? (https://www.excelbanter.com/excel-programming/348703-mimic-print-preview.html)

JK

Mimic Print Preview?
 
I developed an application with a custom toolbar that includes Preview
Reports. When clicked the appropriate WS appears (also with a custom
toolbar) that attempts to mimic Excel's print preview. As a result, I wrote
ActiveWindow.DisplayWorkbookTabs = False. When the preview is closed,
ActiveWindow.DisplayWorkbookTabs = True. However, (though tabs reappear)
they occassionally disappeared when a WS was activated. To get around it I
included ActiveWindow.DisplayWorkbookTabs = True for all WS that are
activated. That works, however, sometimes when a WB is saved and reopened
the tabs aren't there. Any ideas? Perhaps a sure-fire macro to mimic Print
Preview that assures the tabs reappear (always)?

TIA
Jim Kobzeff



Norman Jones

Mimic Print Preview?
 
Hi Jim,

Why mimic Print Preview? Why not:

Application.Dialogs (xlDialogPrintPreview)

---
Regards,
Norman


"JK" wrote in message news:0Koqf.54053$Ht4.50842@trnddc08...
I developed an application with a custom toolbar that includes Preview
Reports. When clicked the appropriate WS appears (also with a custom
toolbar) that attempts to mimic Excel's print preview. As a result, I wrote
ActiveWindow.DisplayWorkbookTabs = False. When the preview is closed,
ActiveWindow.DisplayWorkbookTabs = True. However, (though tabs reappear)
they occassionally disappeared when a WS was activated. To get around it I
included ActiveWindow.DisplayWorkbookTabs = True for all WS that are
activated. That works, however, sometimes when a WB is saved and reopened
the tabs aren't there. Any ideas? Perhaps a sure-fire macro to mimic Print
Preview that assures the tabs reappear (always)?

TIA
Jim Kobzeff





All times are GMT +1. The time now is 03:50 AM.

Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
ExcelBanter.com