Eliminar Filas

Tengo una lista de datos con filas vacías en el intermedio de toda la lista, necesito saber como eliminar todas las filas vacías de una sola vez con alguna rutina condicionante o macro, les agradezco de antemano su ayuda.
Mis mails:
[email protected]
[email protected]
Saludos desde Nicaragua

2 respuestas

Respuesta
1
Me parece que la manera más fácil es ordenando los datos de tal manera que desaparezcan las celdas vacías (o mejor, que estas queden al final).
También podría hacerse mediante una rutina que se repita por todas las celdas y que elimine las que aparezcan vacías, pero es un poco más complejo.
Dime si esta opción te sirve, sino te envío un ejemplo de la rutina.
Gracias Tavopz, muy ágil y oportuna tu ayuda, pensá estaba más difícil el asunto, lo resolví Ordenación de Datos, podría obtener tú mail para consultas directas, Gracias nuevamente y Saludos desde Nicaragua, [email protected]
Respuesta
1
Esta macro elimina filas vacías. Entra el editor VBA (Alt+F11). A la izquierda ves las hojas del libro (si no CTRL+R). Dobleclick en la hoja de la lista de filas vacías. Aquí pegas el código. Cierra el editor.
Herramientas, Macro, Macros. Ejecuta la macro.
Importante: Recuerda hacer una copia de seguridad antes de aplicar esta macro.
Saludos
Anders
xltoday.net
Sub SuprimirFilasVacias()
Dim intUltimaFila As Long
intUltimaFila = Columns("A:A").Range("A65536").End(xlUp).Row
For r = intUltimaFila To 1 Step -1
If Application.CountA(Rows(r)) = 0 Then Rows(r).Delete
Next r
End Sub

Añade tu respuesta

Haz clic para o

Más respuestas relacionadas