Consejo: Otros idiomas son traducidos por Google. Puedes visitar el English versión de este enlace.
Iniciar sesión
x
or
x
x
Suscríbete
x

or

¿Cómo insertar saltos de página cuando el valor cambia en Excel?

doc insert page break valores modificados 1

Supongamos que tengo un rango de celdas y ahora quiero insertar saltos de página en la hoja de trabajo cuando los valores en la columna A cambian como se muestra en la siguiente captura de pantalla. Por supuesto, puede insertarlos uno por uno, pero ¿hay alguna forma rápida de insertar los saltos de página de una vez en función de los valores modificados de una columna?

Insertar saltos de página cuando el valor cambia con el código VBA

Insertar saltos de página cada x filas con Kutools para Excel


flecha azul burbuja derecha Insertar saltos de página cuando el valor cambia con el código VBA


El siguiente código de VBA puede ayudarlo a insertar saltos de página a continuación en función de los cambios en una sola columna de datos, haga lo siguiente:

1. Mantenga pulsado el botón ALT + F11 teclas para abrir el Microsoft Visual Basic para aplicaciones ventana.

2. Hacer clic recuadro > Móduloy pegue el siguiente código en Módulo Ventana.

Código VBA: inserte saltos de página cuando el valor cambie:

Sub insertpagebreaks()
'updateby Extendoffice 20151228
    Dim I As Long, J As Long
    J = ActiveSheet.Cells(Rows.Count, "A").End(xlUp).Row
    For I = J To 2 Step -1
        If Range("A" & I).Value <> Range("A" & I - 1).Value Then
            ActiveSheet.HPageBreaks.Add Before:=Range("A" & I)
        End If
    Next I
End Sub

3. Entonces presione F5 clave para ejecutar este código, todos los saltos de página se han insertado en la hoja cuando los cambios de datos en la columna A. Ver captura de pantalla:

doc insert page break valores modificados 2

Nota: Si desea insertar saltos de página cuando el valor cambia de base en otra columna, debe cambiar el A a cualquier otro encabezado de columna en el código anterior.


flecha azul burbuja derecha Insertar saltos de página cada x filas con Kutools para Excel

A veces, puede necesitar insertar los saltos de página cada n filas, aquí hay una herramienta útil-Kutools for Excel, Con su Insertar salto de página cada fila utilidad, puede terminar rápidamente este trabajo en Excel.

Kutools for Excel : con más de 300 útiles complementos de Excel, de prueba sin límite en días 60.

Después de instalar Kutools for Excel, haz lo siguiente :( Descarga gratuita Kutools for Excel ahora! )

1. Hacer clic Empresa > Impresión > Insertar salto de página cada fila, mira la captura de pantalla:

doc insert page break valores modificados 3

2. En el estallado Insertar salto de página cada fila cuadro de solicitud, ingrese el número de intervalo de filas en el que desea insertar el salto de página debajo del Intervalo de sección, ver captura de pantalla:

doc insert page break valores modificados 4

3. Luego haga clic Ok botón, los saltos de página se han insertado en la hoja de trabajo actual cada 5 filas, ver captura de pantalla:

doc insert page break valores modificados 5

Descarga gratuita Kutools for Excel ahora!


Kutools for Excel: la mejor herramienta de productividad de Office aumenta su productividad en un 80%

  • Super Formula Bar (edite fácilmente varias líneas de texto y fórmula); Diseño de lectura (lee y edita fácilmente un gran número de celdas); Pegar en rango filtrado...
  • Combinar celdas / filas / columnas y mantener datos; Contenido de celdas divididas; Combinar filas duplicadas y suma / promedio... Prevenir células duplicadas; Comparar rangos...
  • Seleccione Duplicado o Único Filas; Seleccionar filas en blanco (todas las celdas están vacías); Super Find y Fuzzy Find en muchos libros de trabajo; Selección aleatoria ...
  • Copia exacta Celdas múltiples sin cambiar la referencia de fórmula; Crear referencias automáticamente a múltiples hojas; Insertar viñetas, Casillas de verificación y más ...
  • Fórmulas favoritas e insertadas rápidamente, Gamas, cuadros y cuadros; Cifrar celdas con contraseña Crear una lista de correo y enviar correos electrónicos ...
  • Extracto del texto, Agregar texto, Eliminar por posición, Eliminar espacio; Crear e imprimir subtotales de paginación; Convertir entre contenido de celdas y comentarios...
  • Súper filtro (guardar y aplicar esquemas de filtro a otras hojas); Clasificación avanzada por mes / semana / día, frecuencia y más; Filtro especial por negrita, cursiva ...
  • Combinar libros de trabajo y hojas de trabajo; Combinar tablas basadas en columnas clave; Dividir datos en varias hojas; Conversión por lotes xls, xlsx y PDF...
  • Funciona con Office 2007-2019 y 365, y es compatible con todos los idiomas. Es fácil de implementar en su empresa. Funciones completas de prueba gratuita de 60-day.
pestaña kte 201905

Office Tab lleva la interfaz con pestañas a Office y hace que su trabajo sea mucho más fácil

  • Habilitar la edición y lectura con pestañas en Word, Excel, PowerPoint, Editor, Acceso, Visio y Proyecto.
  • Abra y cree varios documentos en nuevas pestañas de la misma ventana, en lugar de en nuevas ventanas.
  • ¡Aumenta tu productividad en un 50% y reduce cientos de clics de ratón por ti todos los días!
fondo officetab
Say something here...
symbols left.
You are guest ( Sign Up? )
or post as a guest, but your post won't be published automatically.
Loading comment... The comment will be refreshed after 00:00.
  • To post as a guest, your comment is unpublished.
    GUEST · 7 months ago
    Sorry. EDIT: The first ROW is a column header.
  • To post as a guest, your comment is unpublished.
    GUEST · 7 months ago
    Hello, Thank you! The thought of VBA makes me sweat. I do have one problem with the results of this code though. The first column is a column header. The code treats this as a change. My first page only shows the column header, but he following pages are fine. FYI: This is for a monthly report and the number of rows for each criteria change monthly. Any Ideas? Thank you in advance.