更改完整工作簿的纸张大小(Microsoft Excel)
Bob的工作簿中包含大约十五个工作表,并且他需要将所有工作表的页面格式从Letter更改为A4。通过执行以下步骤,可以快速进行更改:
。用鼠标右键单击任何工作表选项卡。您会看到一个上下文菜单。
。选择选择所有工作表。现在应选择所有工作表选项卡。
。从文件菜单中选择页面设置。 Excel将显示“页面设置”对话框。
。确保显示页面选项卡。 (请参见图1。)
。使用纸张尺寸下拉列表,选择A4。
。单击确定。
。用鼠标右键单击任何工作表选项卡。您将再次看到一个上下文菜单。
。选择取消分组工作表。
而已;现在为所有工作表设置了纸张尺寸。但是,这种方法有一个缺点:如果各个工作表具有不同的页面设置设置(不同的方向,页边距,页眉,页脚等),则按照以下步骤进行设置即可。
如果您只想更改纸张尺寸并且不想更改任何其他设置,则唯一的办法就是使用宏进行更改。
Sub AllSheetsA4() Dim sht As Variant For Each sht In ActiveWorkbook.Sheets sht.PageSetup.PaperSize = xlPaperA4 Next End Sub
宏逐步浏览工作簿中的每张纸,仅更改PaperSize属性,以便该纸将在A4纸上打印。
注意:
如果您想知道如何使用此页面(或_ExcelTips_网站上的任何其他页面)中描述的宏,我准备了一个特殊页面,其中包含有用的信息。
_ExcelTips_是您进行经济高效的Microsoft Excel培训的来源。
本技巧(2896)适用于Microsoft Excel 97、2000、2002和2003。可以在以下功能区中为Excel的功能区界面(Excel 2007及更高版本)找到本技巧的版本: