Saltar al contenido principal

¿Cómo imprimir una hoja de trabajo sin filas en blanco en Excel?

Al imprimir la hoja de trabajo, las filas en blanco también se imprimirán. Para algunos usuarios de Excel, tienden a imprimir hojas de trabajo sin filas en blanco para compactar los datos y guardar papeles. Pero cómo imprimir una hoja de trabajo sin filas en blanco en Excel. Este artículo le proporciona dos métodos.

Ocultar filas en blanco antes de imprimir con código VBA
Elimine filas en blanco antes de imprimir con Kutools para Excel


Ocultar filas en blanco antes de imprimir con código VBA

Antes de imprimir la hoja de trabajo, puede ejecutar el siguiente código VBA para ocultar filas en blanco en un rango especificado. Haz lo siguiente.

1. presione el otro + F11 teclas para abrir el Microsoft Visual Basic para aplicaciones ventana.

2. En el Microsoft Visual Basic para aplicaciones ventana, haga clic recuadro > Módulo. Y luego copie y pegue debajo del código VBA en la ventana del Módulo.

Código de VBA: ocultar filas en blanco en el rango seleccionado

Sub HideBlankRows()
	Dim xRg As Range
	Dim xCell As Range
	Dim xAddress As String
	Dim xUpdate As Boolean
	Dim I As Long
	On Error Resume Next
	xAddress = Application.ActiveWindow.RangeSelection.Address
	Set xRg  = Application.InputBox("Please select a range", "Kutools for Excel", xAddress, , , , , 8)
	Set xRg  = Application.Intersect(xRg, ActiveSheet.UsedRange)
	If xRg Is Nothing Then Exit Sub
		If xRg.Areas.Count > 1 Then
			MsgBox "Don't support multiple ranges", , "Kutools for Excel"
			Exit Sub
			End If
			xUpdate = Application.ScreenUpdating
			Application.ScreenUpdating = False
			For I = 1 To xRg.Rows.Count
				xRg.Rows(I).EntireRow.Hidden = (Application.CountA(xRg.Rows(I)) = 0)
			Next
			Application.ScreenUpdating = xUpdate
		End Sub

3. presione el F5 clave para ejecutar el código, luego una Kutools for Excel aparece el cuadro de diálogo, seleccione el rango con filas en blanco que no desea imprimir, y luego haga clic en el OK del botón.

Luego, todas las filas en blanco en el rango seleccionado se ocultan inmediatamente. Luego, puede comenzar a imprimir la hoja de trabajo sin filas en blanco.

Note: Después de imprimir, puede mostrar estas filas en blanco con el siguiente código VBA.

Código de VBA: muestra todas las filas en blanco en el rango seleccionado

Sub UnhideRows()
	Dim xRg As Range
	Dim xCell As Range
	Dim xAddress As String
	Dim xUpdate As Boolean
	On Error Resume Next
	xAddress = Application.ActiveWindow.RangeSelection.Address
	Set xRg = Application.InputBox("Please select a range to unhide the blank rows", "Kutools for Excel", xAddress, , , , , 8)
	Set xRg = Application.Intersect(xRg, ActiveSheet.UsedRange)
	If xRg Is Nothing Then Exit Sub
		xUpdate = Application.ScreenUpdating
		Application.ScreenUpdating = False
		xRg.EntireRow.Hidden = False
		Application.ScreenUpdating = xUpdate
	End Sub

Elimine filas en blanco antes de imprimir con Kutools para Excel

Si desea imprimir la hoja de trabajo sin filas en blanco, le recomendamos que elimine todas las filas en blanco con el Eliminar filas en blanco utilidad de Kutools for Excely luego puede imprimir la hoja de trabajo manualmente.

Antes de aplicar Kutools for Excel, Por favor descargarlo e instalarlo en primer lugar.

1. Hacer clic en Kutools > Borrar > Eliminar filas en blanco > En rango seleccionado/En hoja activa/En hojas seleccionadas/En todas las hojas basado en sus necesidades. Ver captura de pantalla:

Note: Para eliminar filas en blanco en un rango, primero seleccione este rango y luego aplique la función.

2. A continuación, aparece un cuadro de diálogo para indicarle cuántas filas se han eliminado, haga clic en el OK del botón.

Ahora se eliminan todas las filas en blanco. Puede comenzar a imprimir su hoja de trabajo.

Note: Esta utilidad admite Deshacer Ctrl + Z.

  Si desea tener una prueba gratuita (30 días) de esta utilidad, haga clic para descargarloy luego vaya a aplicar la operación según los pasos anteriores.

Las mejores herramientas de productividad de oficina

🤖 Asistente de IA de Kutools: Revolucionar el análisis de datos basado en: Ejecución inteligente   |  Generar codigo  |  Crear fórmulas personalizadas  |  Analizar datos y generar gráficos  |  Invocar funciones de Kutools...
Características populares: Buscar, resaltar o identificar duplicados   |  Eliminar filas en blanco   |  Combine columnas o celdas sin perder datos   |   Ronda sin fórmula ...
Super búsqueda: Búsqueda virtual de criterios múltiples    Búsqueda V de valores múltiples  |   VLookup en varias hojas   |   Búsqueda difusa ....
Lista desplegable avanzada: Crear rápidamente una lista desplegable   |  Lista desplegable dependiente   |  Lista desplegable de selección múltiple ....
Administrador de columnas: Agregar un número específico de columnas  |  Mover columnas  |  Toggle Estado de visibilidad de columnas ocultas  |  Comparar rangos y columnas ...
Características destacadas: Enfoque de cuadrícula   |  Vista de diseño   |   Gran barra de fórmulas    Administrador de hojas y libros de trabajo   |  Biblioteca de Recursos (Texto automático)   |  Selector de fechas   |  Combinar hojas de trabajo   |  Cifrar/descifrar celdas    Enviar correos electrónicos por lista   |  Súper filtro   |   Filtro especial (filtro negrita/cursiva/tachado...) ...
Los 15 mejores conjuntos de herramientas12 Texto Herramientas (Añadir texto, Quitar caracteres, ...)   |   50+ Tabla Tipos (Diagrama de Gantt, ...)   |   40+ Práctico Fórmulas (Calcular la edad según el cumpleaños, ...)   |   19 Inserción Herramientas (Insertar código QR, Insertar imagen desde la ruta, ...)   |   12 Conversión Herramientas (Números a palabras, Conversión de Moneda, ...)   |   7 Fusionar y dividir Herramientas (Filas combinadas avanzadas, Células partidas, ...)   |   ... y más

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...

Descripción


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!
Comments (0)
No ratings yet. Be the first to rate!
There are no comments posted here yet
Please leave your comments in English
Posting as Guest
×
Rate this post:
0   Characters
Suggested Locations