¿Cómo copiar y pegar solo celdas no vacías en Excel?
La mayoría de nosotros puede haber sufrido con este problema: cuando copiamos una lista de datos que contiene algunas celdas vacías, y luego las pegamos en otra columna, también se pegarán las celdas vacías. Esto es muy molesto cuando no necesitamos los espacios en blanco y queremos pegar solo las celdas no vacías. En este caso, ¿cómo podríamos copiar y pegar solo las celdas no vacías en Excel de manera rápida y conveniente? Aquí hay algunos trucos rápidos para ayudarte a resolverlo:
Copiar y pegar solo celdas no vacías con el comando Ir a Especial
Copiar y pegar solo celdas no vacías con Kutools para Excel 
Copiar y pegar solo celdas no vacías con la función Filtro
Copiar y pegar solo celdas no vacías con Fórmula de Matriz
Copiar y pegar solo celdas no vacías con código VBA
Copiar y pegar solo celdas no vacías con el comando Ir a Especial
Con el comando Ir a Especial, puedes seleccionar todos los datos primero, y luego copiarlos y pegarlos en otra ubicación.
1. Selecciona tu lista de datos que deseas utilizar.
2. Luego haz clic en Inicio > Buscar y seleccionar > Ir a Especial, ver captura de pantalla:
3. En el cuadro de diálogo Ir a Especial, marca la opción Constantes, ver captura de pantalla:
4. Luego haz clic en Aceptar, y solo las celdas con valores habrán sido seleccionadas en la lista.
5. Y luego copia y pega los datos en una ubicación que desees. Solo los valores de las celdas no vacías se habrán pegado. Ver captura de pantalla:
Nota: Este método solo está disponible para las constantes, no se aplica a las celdas con fórmulas.
Copiar y pegar solo celdas no vacías con Kutools para Excel
¿Existe alguna forma más fácil que la anterior? Por supuesto, la utilidad Seleccionar celdas no vacías de Kutools para Excel puede ayudarte a seleccionar primero las celdas no vacías, y luego copiarlas y pegarlas.
Después de instalar gratuitamente Kutools para Excel, por favor sigue los pasos a continuación:
1. Selecciona el rango de celdas, y haz clic Kutools > Seleccionar > Seleccionar celdas no vacías. Ver captura de pantalla:
2. Luego se seleccionan las celdas no vacías, presiona Ctrl + C para copiarlas, luego ve a seleccionar una celda donde quieras pegar el resultado, presiona Ctrl + V para pegar las celdas no vacías seleccionadas. Ver captura de pantalla:
Copiar y pegar solo celdas no vacías con la función Filtro
La función Filtro puede ayudarte a filtrar primero las celdas no vacías, y luego puedes copiarlas y pegarlas en otras celdas según sea necesario.
2. Haz clic en Datos > Filtro, ver captura de pantalla:
3. Luego haz clic en el botón desplegable en la esquina derecha de la celda en la lista seleccionada, y desmarca la opción Blancos bajo el menú desplegable. Ver captura de pantalla:
4. Y luego haz clic en Aceptar, todas las celdas no vacías se han filtrado como se muestra en la siguiente captura de pantalla:
5. Por último, puedes copiar los datos filtrados y pegarlos en cualquier lugar que necesites.
Nota: Tanto los valores como las fórmulas son afectados al usar este método.
Copiar y pegar solo celdas no vacías con Fórmula de Matriz
Para copiar y pegar solo las celdas no vacías, también puedes aplicar la siguiente fórmula de matriz.
1. Además de tus datos, introduce la siguiente fórmula en una celda vacía:
=BUSCAR("zzzzz",ELEGIR({1,2},"",INDICE(A:A,MENOR(SI($A$1:$A$15<>"",FILA($A$1:$A$15)),FILAS($B$1:B1)))))
Nota: En la fórmula anterior, A1:A15 es la lista de datos que deseas utilizar. Puedes cambiarla según tus necesidades.
2. Luego presiona Shift + Ctrl + Enter juntos, y luego selecciona la celda B1, y arrastra el controlador de relleno sobre el rango que deseas que contenga esta fórmula, y se habrán extraído todos los valores de las celdas no vacías. Ver captura de pantalla:
3. Como son fórmulas, cuando las copies a otro lugar, debes copiarlas y pegarlas como valores.
Nota: Esta fórmula solo está disponible para las constantes, no se aplica a las celdas con fórmulas.
Copiar y pegar solo celdas no vacías con código VBA
Si estás interesado en el código VBA, puedes ejecutar el siguiente código para completar esta tarea.
1. Mantén presionadas las teclas ALT + F11, y se abrirá la ventana Microsoft Visual Basic para Aplicaciones.
2. Haz clic en Insertar > Módulo, y pega el siguiente código en la Ventana del Módulo.
Código VBA: Copiar y pegar solo celdas no vacías en Excel
Sub PasteNotBlanks()
'Update 20140325
Dim rng As Range
Dim InputRng As Range, OutRng As Range
xTitleId = "KutoolsforExcel"
Set InputRng = Application.Selection
Set InputRng = Application.InputBox("Range :", xTitleId, InputRng.Address, Type:=8)
If InputRng.Columns.Count > 1 Then
MsgBox "Please select one column."
Exit Sub
End If
Set OutRng = Application.InputBox("Out put to (single cell):", xTitleId, Type:=8)
InputRng.SpecialCells(xlCellTypeConstants).Copy Destination:=OutRng.Range("A1")
End Sub
3. Luego presiona la tecla F5 para ejecutar este código, aparecerá un cuadro de diálogo para recordarte que selecciones el rango de datos que deseas utilizar. Ver captura de pantalla:
4. Y luego haz clic en Aceptar, aparecerá otro cuadro de diálogo para que elijas una celda donde colocar los datos.
5. Haz clic en Aceptar para finalizar este código, y solo los valores de las celdas no vacías se habrán pegado en la posición especificada.
Nota: Este código solo está disponible para las constantes.
Las mejores herramientas de productividad para Office
Mejora tu dominio de Excel con Kutools para Excel y experimenta una eficiencia sin precedentes. Kutools para Excel ofrece más de300 funciones avanzadas para aumentar la productividad y ahorrar tiempo. Haz clic aquí para obtener la función que más necesitas...
Office Tab incorpora la interfaz de pestañas en Office y facilita mucho tu trabajo
- Habilita la edición y lectura con pestañas en Word, Excel, PowerPoint, Publisher, Access, Visio y Project.
- Abre y crea varios documentos en nuevas pestañas de la misma ventana, en lugar de hacerlo en ventanas separadas.
- ¡Aumenta tu productividad en un50% y reduce cientos de clics de ratón cada día!
Todos los complementos de Kutools. Un solo instalador
El paquete Kutools for Office agrupa complementos para Excel, Word, Outlook y PowerPoint junto con Office Tab Pro, ideal para equipos que trabajan en varias aplicaciones de Office.
- Suite todo en uno: complementos para Excel, Word, Outlook y PowerPoint + Office Tab Pro
- Un solo instalador, una licencia: configuración en minutos (compatible con MSI)
- Mejor juntos: productividad optimizada en todas las aplicaciones de Office
- Prueba completa de30 días: sin registro ni tarjeta de crédito
- La mejor relación calidad-precio: ahorra en comparación con la compra individual de complementos