¿Cómo imprimir una columna larga en una página en Excel?
Supongamos que tiene una lista larga de datos en una columna, tal vez 200 filas, y ahora necesita imprimirlos, pero cuando imprime, usa papel de aproximadamente 5 páginas, con solo una columna en el lado izquierdo y mucho espacio en blanco en el lado correcto. En palabras, puede colocar columnas, pero Excel no tiene esta función. ¿Cómo se imprimen los datos de la lista larga en una página para ahorrar papel?
Imprima una columna larga en una página con fórmula
Imprima una columna larga en una página con código VBA
Imprima una columna larga en una página con Kutools para Excel
- Reutiliza cualquier cosa: Agregue las fórmulas, gráficos y cualquier otra cosa más utilizados o complejos a sus favoritos y reutilícelos rápidamente en el futuro.
- Más de 20 funciones de texto: Extraer número de la cadena de texto; Extraer o eliminar parte de los textos; Convierta números y monedas a palabras en inglés.
- Combinar herramientas: Varios libros de trabajo y hojas en uno; Fusionar varias celdas / filas / columnas sin perder datos; Fusionar filas duplicadas y suma.
- Herramientas divididas: Divida los datos en varias hojas según el valor; Un libro de trabajo para varios archivos Excel, PDF o CSV; Una columna a varias columnas.
- Pegar saltando Filas ocultas / filtradas; Cuenta y suma por color de fondo; Envíe correos electrónicos personalizados a varios destinatarios de forma masiva.
- Súper filtro: Cree esquemas de filtros avanzados y aplíquelos a cualquier hoja; Ordenar por semana, día, frecuencia y más; Filtrar por negrita, fórmulas, comentario ...
- Más de 300 potentes funciones; Funciona con Office 2007-2021 y 365; Admite todos los idiomas; Fácil implementación en su empresa u organización.
Imprima una columna larga en una página con fórmula
Aquí puedo presentarte una fórmula larga para resolver este problema, haz lo siguiente:
1. En una nueva hoja de trabajo de su libro activo, ingrese la fórmula =IF(OFFSET(Sheet1!$A$1,(COLUMN()-1)*45+ROW()-1,0)="","",OFFSET(Sheet1!$A$1,(COLUMN()-1)*45+ROW()-1,0)) en la celda A1.
Notas: Sheet1 es la hoja de trabajo que tiene la lista larga que desea colocar en la columna.
45 es el número de fila en el que desea incluir los datos en una columna.
Todas son variables y puede cambiarlas según sus necesidades.
2. Luego, seleccione la celda A1 y arrastre el controlador de relleno hasta la fila 45, y luego continúe arrastrando el controlador de relleno hacia la derecha hasta que se muestren los datos. Y la columna larga se ha dividido en varias columnas para que quepan en una página en una nueva hoja de trabajo. Ver captura de pantalla:
Imprima una columna larga en una página con código VBA
El siguiente código VBA también puede ayudarlo a dividir una larga lista de datos en varias columnas, para que pueda imprimir los datos y ahorrar papel.
1. Mantenga pulsado el ALT + F11 llaves, y abre el Microsoft Visual Basic para aplicaciones ventana.
2. Hacer clic recuadro > Móduloy pegue el siguiente código en la ventana del módulo.
Sub SingleToMultiColumn()
Dim rng As Range
Dim iCols As Integer
Dim lRows As Long
Dim iCol As Integer
Dim lRow As Long
Dim lRowSource As Long
Dim x As Long
Dim wks As Worksheet
Set rng = Application.InputBox _
(prompt:="Select the range to convert", _
Type:=8)
iCols = InputBox("How many columns do you want?")
lRowSource = rng.Rows.Count
lRows = lRowSource / iCols
If lRows * iCols <> lRowSource Then lRows = lRows + 1
Set wks = Worksheets.Add
lRow = 1
x = 1
For iCol = 1 To iCols
Do While x <= lRows And lRow <= lRowSource
Cells(x, iCol) = rng.Cells(lRow, 1)
x = x + 1
lRow = lRow + 1
Loop
x = 1
Next
End Sub
3. Luego presione el F5 para ejecutar este código, y seleccione la lista de datos que desea dividir en el cuadro de diálogo emergente, vea la captura de pantalla:
4. Hacer clic OKe ingrese el número de columnas que desea dividir. Ver captura de pantalla:
5. Y haga clic en OK, la columna larga se ha dividido en cinco columnas en una nueva hoja de trabajo. Ver capturas de pantalla:
![]() |
![]() |
![]() |
Imprima una columna larga en una página con Kutools para Excel
Tanto la fórmula larga como el código VBA pueden ser difíciles para ti, aquí puedo presentarte un método fácil y conveniente para resolver este problema. Kutools for Excel, Imprimir varias columnas La función puede ayudarlo a dividir rápidamente la columna larga en varias columnas para que pueda imprimirlas de manera razonable.
Kutools for Excel incluye más de 300 útiles herramientas de Excel. Prueba gratis sin límite en 30 días. Comprar ahora .
Cuando haya instalado Kutools para Excel, puede hacer los siguientes pasos:
1. Hacer clic Empresa > Imprimir varias columnas, ver captura de pantalla:
2. En la Imprimir varias columnas caja de diálogo:
- Haga clic en el primero
para seleccionar el título del rango y luego haga clic en el segundo
para seleccionar la columna que desea dividir.
- Luego especifique el número de filas que desea poner por página desde Filas por página impresae ingrese el número de columnas que desea en una página en Numero de segmentos. Ver captura de pantalla:
3. Luego haga clic OK, los datos de la lista larga se han dividido en cinco columnas en una página. Ver capturas de pantalla:
![]() |
![]() |
![]() |
Notas
1. El título se agregará antes de cada columna.
2. Si marca Crea un enlace con la hoja activa opción, los datos de la nueva hoja de trabajo se pueden vincular a los datos de origen.
Si desea obtener más información sobre esta función, haga clic en Imprimir varias columnas.
Las mejores herramientas de productividad de oficina
Kutools para Excel resuelve la mayoría de sus problemas y aumenta su productividad en un 80%
- Reutilizar: Inserte rápidamente fórmulas complejas, gráficos y cualquier cosa que hayas usado antes; Cifrar celdas con contraseña; Crear lista de distribución y enviar correos electrónicos ...
- Barra de súper fórmula (edite fácilmente varias líneas de texto y fórmulas); Diseño de lectura (leer y editar fácilmente un gran número de celdas); Pegar en rango filtrado...
- Combinar celdas / filas / columnas sin perder datos; Contenido de celdas divididas; Combinar filas / columnas duplicadas... Prevenir celdas 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 Varias celdas sin cambiar la referencia de la fórmula; Crear referencias automáticamente a varias hojas; Insertar viñetas, Casillas de verificación y más ...
- Extraer texto, Agregar texto, Eliminar por posición, Quitar espacio; Crear e imprimir subtotales de paginación; Convertir entre contenido de celdas y comentarios...
- Súper filtro (guardar y aplicar esquemas de filtros a otras hojas); Orden avanzado por mes / semana / día, frecuencia y más; Filtro especial en negrita, cursiva ...
- Combinar libros y hojas de trabajo; Combinar tablas basadas en columnas clave; Dividir datos en varias hojas; Conversión por lotes de xls, xlsx y PDF...
- Más de 300 potentes funciones. Compatible con Office/Excel 2007-2021 y 365. Compatible con todos los idiomas. Fácil implementación en su empresa u organización. Funciones completas Prueba gratuita de 30 días. Garantía de devolución de dinero de 60 días.

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!













