¿Cómo condicionar la inserción de saltos de página en Excel?
Suponiendo que necesita insertar saltos de página mientras se cambian los valores en la columna A como se muestra a continuación, ¿cómo podría manejarlo en Excel? Generalmente, puede insertar los saltos de página uno por uno manualmente, pero aquí, presento algunos trucos para resolver esto rápidamente.
Uso de la función de subtotal para insertar saltos de página
Usando código VBA para insertar saltos de página
Distinguir diferencias para insertar un salto de página cuando cambien los datos
Insertar salto de página en cada fila para insertar salto de página en enésimas filas
Uso de la función de subtotal para insertar saltos de página
En Excel, la función Subtotal puede agregar saltos de página según el grupo.
1. Seleccione los datos a los que desea agregar saltos de página, haga clic en Datos > Total .
2. En el Total cuadro de diálogo, seleccione la columna en la que desea insertar el salto de página en función de su valor en En cada cambio en la lista desplegable, luego elija la función que desea utilizar Utilice la función lista, luego revisa Salto de página entre grupos casilla de verificación y otras opciones que necesite.
3. Hacer clic en OK. Ahora los datos se han agrupado y se han agregado saltos de página.
Usando código VBA para insertar saltos de página
Si no desea agregar grupos a los datos, puede probar el código VBA para manejar este trabajo.
1. Prensa Alt + F11 teclas para mostrar Microsoft Visual Basic para aplicaciones ventana.
2. Hacer clic en recuadro > Módulo, copie y pegue el código siguiente en la nueva ventana del módulo.
VBA: inserta saltos de página cuando cambian los datos
Sub PageBreak()
'UpdatebyExtendOffice20181101
Dim xSRg As Range
Dim xRg As Range
On Error Resume Next
Set xSRg = Application.InputBox("Select key column:", "Kutools for Excel", xTxt, , , , , 8)
If xSRg Is Nothing Then Exit Sub
Application.ScreenUpdating = False
For Each xRg In xSRg
ActiveSheet.Rows(xRg.Row).PageBreak = xlPageBreakNone
If xRg.Value <> xRg.Offset(-1, 0).Value Then
ActiveSheet.Rows(xRg.Row).PageBreak = xlPageBreakManual
End If
Next xRg
Application.ScreenUpdating = True
End Sub
3. Prensa F5 clave, aparece un cuadro de diálogo para recordarle que seleccione la columna clave en la que se inserta el salto de página.
4. Hacer clic en OK, ahora se han insertado los saltos de página.
Distinguir diferencias para insertar un salto de página cuando cambien los datos
La Distinguir diferencias característica de Kutools for Excel admite insertar salto de página, fila en blanco, borde inferior o color de fondo cuando los datos cambian en Excel.
Kutools for Excel, con más de 300 funciones prácticas, facilita su trabajo. |
Después de instalar Kutools para Excel, haga lo siguiente:(¡Descarga gratis Kutools para Excel ahora!)
Haga Clic en Kutools > Formato > Distinguir diferencias.
2. En el Distinguir diferencias por columna clave cuadro de diálogo, finalice la configuración a continuación:
1) haga clic en el icono de selección existentes Gama de Colores sección, seleccione el rango de datos (excluyendo los encabezados de columna)
2) haga clic en el icono de selección existentes Columna clave sección, seleccione la columna en la que desea insertar el salto de página según el cambio de datos correspondiente (excluyendo los encabezados de columna)
3) comprobar Salto de página en opción Opciones .
3. Hacer clic en Ok.
Ahora se insertan saltos de página cuando los datos cambian en el rango seleccionado.
Insertar salto de página en cada fila para insertar salto de página en enésimas filas
Si desea insertar saltos de página en un intervalo fijo, puede utilizar Kutools for Excel, Insertar página en cada fila utilidad para manejar rápidamente el problema.
Después de instalar Kutools para Excel, haga lo siguiente:(¡Descarga gratis Kutools para Excel ahora!)
1. Seleccione los datos y haga clic en Kutools Más > Impresión > Insertar salto de página en cada fila.
2. En el Insertar salto de página en cada fila cuadro de diálogo, escriba el intervalo que necesite.
3. Hacer clic en OK > OK para cerrar los diálogos, se han insertado los saltos de página en cada 2 filas.
Insertar página Saltar cada enésima fila
Las mejores herramientas de productividad de oficina
Mejore sus habilidades de Excel con Kutools for Excel y experimente la eficiencia como nunca antes. Kutools for Excel ofrece más de 300 funciones avanzadas para aumentar la productividad y ahorrar tiempo. Haga clic aquí para obtener la función que más necesita...
Office Tab lleva la interfaz con pestañas a Office y hace que su trabajo sea mucho más fácil
- Habilite la edición y lectura con pestañas en Word, Excel, PowerPoint, Publisher, Access, Visio y Project.
- Abra y cree varios documentos en nuevas pestañas de la misma ventana, en lugar de en nuevas ventanas.
- ¡Aumenta su productividad en un 50% y reduce cientos de clics del mouse todos los días!