Compartir un libro de Excel con un grupo también significa estar involucrado con diferentes impresoras, diferentes PC y diferentes requisitos y expectativas de los usuarios. Esto no es más evidente que cuando se trata de imprimir una hoja de trabajo. Obviamente, diferentes usuarios tienen diferentes PC y pueden tener diferentes impresoras, por lo que los resultados impresos pueden variar de un usuario a otro. Además, diferentes usuarios pueden cambiar los rangos de impresión en lo que se produce a partir de una hoja de trabajo.

Si es responsable de una hoja de trabajo en particular, es posible que desee proteger de alguna manera las distintas configuraciones de impresión que ha establecido para que otros usuarios no las alteren. Quizás la forma más fácil de hacer esto es guardar la configuración de impresión en una macro y luego ejecutar esa macro cada vez que se cierra el libro. De esa manera, la configuración se puede volver a cambiar a los «valores predeterminados» que especifique, sin preocuparse de que los usuarios los estropeen todos.

Por ejemplo, la siguiente macro muestra cómo puede establecer todas las configuraciones de impresión para un trabajo de impresión en particular:

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

Para que la macro funcione para sus necesidades particulares, simplemente modifique la configuración para que coincida con sus requisitos.

Por supuesto, cuando alguien más abre su libro de trabajo, la macro puede deshabilitarse automáticamente o pueden ver una notificación de que hay macros en él. Si eligen deshabilitar las macros, la macro de configuración predeterminada no se ejecutará cuando se cierre el libro. La solución, por supuesto, es que abra el libro, habilite las macros y luego cierre el libro. Esto ejecuta la macro y sus configuraciones se restauran nuevamente como las desea.

_Nota: _

Si desea saber cómo usar las macros descritas en esta página (o en cualquier otra página de los sitios ExcelTips), he preparado una página especial que incluye información útil.

link: / excelribbon-ExcelTipsMacros [Haga clic aquí para abrir esa página especial en una nueva pestaña del navegador].

ExcelTips es su fuente de formación rentable en Microsoft Excel.

Este consejo (11599) se aplica a Microsoft Excel 2007, 2010, 2013 y 2016.

Puede encontrar una versión de este consejo para la interfaz de menú anterior de Excel aquí:

link: / excel-Protecting_Print_Settings [Protección de la configuración de impresión].