与一个组共享Excel工作簿还意味着涉及不同的打印机,不同的PC和不同的用户要求和期望。在打印工作表时,这是最明显的。不同的用户显然拥有不同的PC,并且可能具有不同的打印机,因此打印结果可能因一个用户而异。此外,不同的用户可能会更改工作表所产生内容的打印范围。

如果您要负责特定的工作表,则可能需要以某种方式保护已建立的各种打印设置,以免其他用户乱码。这样做的最简单方法可能是将打印设置保存在宏中,然后在每次关闭工作簿时都运行该宏。这样,可以将设置更改回您指定的“默认值”,而不必担心用户会将它们弄乱。

例如,以下宏显示了如何设置特定打印作业的所有打印设置:

Sub Auto_Close()

With ActiveSheet.PageSetup         .LeftHeader = ""

.CenterHeader = ""

.RightHeader = ""

.LeftFooter = ""

.CenterFooter = ""

.RightFooter = ""

.LeftMargin = Application.InchesToPoints(1)

.RightMargin = Application.InchesToPoints(1)

.TopMargin = Application.InchesToPoints(1)

.BottomMargin = Application.InchesToPoints(1)

.HeaderMargin = Application.InchesToPoints(0.5)

.FooterMargin = Application.InchesToPoints(0.5)

.PrintHeadings = False         .PrintGridlines = False         .PrintComments = xlPrintNoComments         .CenterHorizontally = False         .CenterVertically = False         .Orientation = xlPortrait         .Draft = False         .PaperSize = xlPaperLetter         .FirstPageNumber = xlAutomatic         .Order = xlDownThenOver         .BlackAndWhite = False         .Zoom = False         .FitToPagesWide = 1         .FitToPagesTall = 99         .PrintErrors = xlPrintErrorsDisplayed         .PrintArea = "MyPrintArea"

.PrintTitleRows = ""

.PrintTitleColumns = ""

End With End Sub

若要使宏适合您的特定需求,只需修改设置以符合您的要求即可。

当然,当其他人打开您的工作簿时,该宏可能会自动被禁用,或者他们可能会看到其中包含宏的通知。如果他们选择禁用宏,则关闭工作簿时,默认设置的宏将不会运行。当然,解决方案是让您打开工作簿,启用宏,然后关闭工作簿。这将运行宏,并根据需要再次还原您的设置。

注意:

如果您想知道如何使用此页面(或_ExcelTips_网站上的任何其他页面)中描述的宏,我准备了一个特殊页面,其中包含有用的信息。

_ExcelTips_是您进行经济高效的Microsoft Excel培训的来源。

本技巧(11599)适用于Microsoft Excel 2007、2010、2013和2016。您可以在此处为Excel的较旧菜单界面找到此技巧的版本:

链接:/ excel-Protecting_Print_Settings [保护打印设置]。