Repetición de filas en una impresión Excepto en la última página

September 8

Nancy sabe cómo dar formato a una hoja de cálculo para que las filas se repiten en la parte superior de cada página de una copia impresa. Lo que ella quiere hacer, sin embargo, es que las filas repetidas en la parte superior de cada página impresa, excepto la última.

No hay forma directa de hacer esto, pero se puede simular una impresión tal mediante una macro para hacer la tarea. Todo lo que necesitas hacer es tener la impresión macro todos excepto su última página, a continuación, cambiar la configuración de la página de modo que las filas no se repitan, y, finalmente, imprimir la página final de la impresión. La macro siguiente proporciona un ejemplo de este enfoque.

Sub PrintWorksheet ()
LPages Dim As Long
Dim sTemp As String

lPages = Application.ExecuteExcel4Macro ("GET.DOCUMENT (50)")
Con ActiveSheet.PageSetup
ActiveSheet.PrintOut Desde: = 1, A: = lPages - 1
sTemp = .PrintTitleRows
.PrintTitleRows = ""
ActiveSheet.PrintOut Desde: = lPages, A: = lPages
.PrintTitleRows = STemp
End With
End Sub

ExcelTips es su fuente de capacitación rentable Microsoft Excel. Esta punta (3389) se aplica a Microsoft Excel 97, 2000, 2002, y 2003. Usted puede encontrar una versión de este consejo para la interfaz de cinta de Excel (Excel 2007 y versiones posteriores) aquí: Repetición de filas en una impresión Excepto en la última página .