¿Cómo copiar y pegar únicamente las celdas no vacías en Excel?
Muchos de nosotros hemos enfrentado este problema: al copiar una lista de datos que incluye celdas vacías y pegarla en otra columna, también se pegan esos espacios en blanco. Esto resulta muy molesto cuando no necesitamos los huecos y queremos pegar únicamente las celdas con contenido. ¿Cómo podemos copiar y pegar solo las celdas no vacías en Excel de forma rápida y sencilla? A continuación, le compartimos algunos trucos prácticos para 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 matricial
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, primero puede seleccionar todos los datos y luego copiarlos y pegarlos en otra ubicación.
1. Seleccione la lista de datos que quiera utilizar.
2. A continuación, haga clic en Inicio > Buscar y seleccionar > Ir a especial. Consulte la captura de pantalla:
3. En el cuadro de diálogo Ir a especial, active la opción Constantes. Consulte la captura de pantalla:
4. A continuación, haga clic en Aceptar y solo las celdas con valores quedarán seleccionadas en la lista.
5. A continuación, copie y pegue los datos en la ubicación deseada. Así, solo se pegarán los valores de las celdas no vacías. Consulte la captura de pantalla:
Nota: Este método solo está disponible para constantes; no se puede aplicar a celdas con fórmulas.
Copiar y pegar solo celdas no vacías con Kutools para Excel
¿Existe alguna forma mucho más sencilla que las anteriores? ¡Por supuesto! La utilidad Kutools para Excel de Seleccionar celdas no vacías le permite seleccionar primero las celdas no vacías y, posteriormente, copiarlas y pegarlas.
Después de instalar gratuitamenteKutools para Excel, siga estos pasos:
1. Seleccione el rango de celdas y haga clic en Kutools > Seleccionar > Seleccionar celdas no vacías. Consulte la captura de pantalla:
2. Las celdas no vacías quedarán seleccionadas; pulse Ctrl + C para copiarlas. A continuación, seleccione la celda donde desee mostrar el resultado pegado y pulse Ctrl + V para pegar. Seleccione celdas no vacías. Consulte la captura de pantalla:
Copiar y pegar solo celdas no vacías con la función Filtro
La función Filtro le permite filtrar primero las celdas no vacías y, después, copiarlas y pegarlas en otras celdas según sus necesidades.
2. Haga clic en Datos > Filtro. Consulte la captura de pantalla:
3. A continuación, haga clic en el botón desplegable situado en la esquina derecha de la celda de la lista seleccionada y desactive la opción En blanco del menú desplegable. Consulte la captura de pantalla:
4. A continuación, haga clic en Aceptar y se filtrarán todas las celdas no vacías, tal como se muestra en la siguiente captura de pantalla:
5. Por último, podrá copiar los datos filtrados y pegarlos donde los necesite.
Nota: Este método funciona tanto con valores como con fórmulas.
Copiar y pegar solo celdas no vacías con fórmula matricial
Para copiar y pegar únicamente las celdas no vacías, también puede utilizar la siguiente fórmula matricial.
1. Junto a sus datos, introduzca la siguiente fórmula en una celda vacía:
=LOOKUP(«zzzzz»,CHOOSE({1,2},«»,INDEX(A:A,SMALL(IF($A$1:$A$15<>«»,ROW($A$1:$A$15)),ROWS($B$1:B1)))))
Nota: En la fórmula anterior, A1:A15 es el rango de datos que desea utilizar. Puede ajustarlo según sus necesidades.
2. A continuación, pulse simultáneamente las teclas Mayús + Ctrl + Intro, seleccione la celda B1 y arrastre el controlador de relleno hasta el rango en el que desee aplicar esta fórmula. Así se extraerán todos los valores de las celdas no vacías. Consulte la captura de pantalla:
3. Dado que se trata de fórmulas, cópielas como valores al trasladarlas a otro lugar.
Nota: Esta fórmula solo está disponible para constantes; no funciona con celdas que contengan fórmulas.
Copiar y pegar solo celdas no vacías con código VBA
Si le interesa el código VBA, puede ejecutar el siguiente código para completar esta tarea.
1. Mantenga pulsadas las teclas Alt + F11 para abrir la ventana Microsoft Visual Basic para Aplicaciones.
2. Haga clic en Insertar > Módulo y pegue 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. A continuación, pulse la tecla F5 para ejecutar este código. Aparecerá un cuadro de diálogo que le recordará que seleccione el rango de datos que desea utilizar. Consulte la captura de pantalla:
4. A continuación, haga clic en Aceptar y aparecerá otro cuadro de diálogo para que elija la celda donde colocar los datos.
5. Haga clic en Aceptar para finalizar la ejecución del código, y los valores de las celdas no vacías se pegarán en la posición especificada.
Nota: Este código solo está disponible para constantes.
Las mejores herramientas de productividad para Office
Potencie sus habilidades en Excel con Kutools para Excel y experimente una eficiencia como nunca antes.Kutools para Excel ofrece más de 300 funciones avanzadas para aumentar su productividad y Ahorrar tiempo.Haga clic aquí para obtener la función que más necesita...
Office Tab aporta una interfaz con pestañas a Office y hace que su trabajo sea mucho más fácil
- Active 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 dentro de la misma ventana, en lugar de hacerlo en ventanas separadas.
- ¡Aumente su productividad en un 50 % y elimine cientos de clics del ratón cada día!
Todos los complementos de Kutools en un solo instalador.
Kutools for Office es la suite que incluye complementos para Excel, Word, Outlook y PowerPoint, además de Office Tab Pro, ideal para equipos que trabajan en distintas aplicaciones de Office.
- Suite integral— complementos para Excel, Word, Outlook y PowerPoint + Office Tab Pro
- Un instalador, una licencia— configuración en minutos (compatible con MSI)
- Rendimiento mejorado en conjunto— productividad optimizada en todas las aplicaciones de Office
- Prueba gratuita de 30 días con todas las funciones— sin registro ni tarjeta de crédito
- La mejor relación calidad-precio— ahorre frente a la compra individual de complementos