Welcome toExcel.Tips.Net
Tips.Net Home
ExcelTips Home
Ask an Excel Question
Make a Comment
ExcelTips FAQ
ExcelTips Premium
Learn Access Now
Free Printable Forms
Beauty Tips
Car Tips
Cleaning Tips
College Tips
Cooking Tips
Excel2007 Tips
ExcelTips
Family Tips
Gardening Tips
Health Tips
Home Tips
Legal Tips
Money Tips
Organizing Tips
Pest Tips
Pet Tips
Wedding Tips
Word2007 Tips
WordTips
Advertise on the
ExcelTips Site
Adding a Little Animation to Your Life
Converting a Range of URLs to Hyperlinks
Making the Formula Bar Persistent
Bob has a workbook that has about fifteen worksheets in it, and he needs to change the page format for all the worksheet from Letter to A4. There is a quick way to make the change by following these steps:
That's it; the paper size is now set for all the worksheets. There is a drawback to this approach, however: If individual worksheets have differing page setup settings (different orientations, margins, headers, footers, etc.), then following these steps will set them all the same. If you only want to change the paper size and don't want to change any other settings, your only recourse is to use a macro to do the change.
Sub AllSheetsA4()
Dim sht As Variant
For Each sht In ActiveWorkbook.Sheets
sht.PageSetup.PaperSize = xlPaperA4
Next
End Sub
The macro steps through each sheet in the workbook, changing only the PaperSize property so that the sheet will print on A4 paper.
ExcelTips is your source for cost-effective Microsoft Excel training. This tip (2896) applies to Microsoft Excel versions: 97 2000 2002 2003 2007
Save Time and Money! Many people need to keep track of employee time, but don't know where to start when it comes to creating a spreadsheet. Here's a way to save time, effort, and money with ready-to-use timesheet templates.