Home |
Search |
Today's Posts |
#1
Posted to microsoft.public.excel.programming
|
|||
|
|||
Setting zoom for all worksheet pages
Hi david,
Try putting your code into a For..Each..Next statament. Dim ws As Worksheet For Each ws In Worksheets If ws.Name < mSheet Then ws.Activate ....<Your code here End If Next ws HTH's Russell.(Skmr3) -----Original Message----- I have built a mutipage management reporting package, but have run into one problem I don't know how to fix. I have designed all information views to fit on one screen, and to require no scrolling. Unfortunately, not all of my users can see the same amount of information on their screens as I do. Since I do not expect that they will want to use Zoom on each page, I am trying to figure out how to write a macro that will allow the user to fill in a Zoom percentage on a screen I design, check to see that the appropriate range is displayed, and then adjust the views on all pages accordingly. I have figured out how to do this one page at a time, but wonder if there is a way to do this to the entire workbook. Any help will be greatly appreciated. . |
Reply |
Thread Tools | Search this Thread |
Display Modes | |
|
|
Similar Threads | ||||
Thread | Forum | |||
Setting the zoom size of a new window from 100% to 75% | Excel Discussion (Misc queries) | |||
Setting Default Zoom | Excel Discussion (Misc queries) | |||
recalculate page breaks after setting Zoom in pagesetup | Excel Discussion (Misc queries) | |||
setting of screen zoom in excel | Excel Discussion (Misc queries) | |||
Setting zoom for all worksheet pages | Excel Programming |