ELIMINAR FILAS EN EXCEL !!!!
Publicado por Giancarlo Jose (67 intervenciones) el 28/04/2016 22:03:23
HOLA A TODOS !!!
QUIERO ELIMINAR LAS FILAS EN BLANCO PERO NO ME SALE AL 100%
TENGO EL SIGUIENTE CÓDIGO QUE POR EJEMPLO TENGO VACÍAS LA FILA 20 a la 25 ME LAS BORRA TODAS PERO MENOS LA 20 POR QUE ??? AYUDEN O SI TIENEN OTRO CÓDIGO PARA ELIMINAR FILAS EN BLANCO POR FAVOR !!!
QUIERO ELIMINAR LAS FILAS EN BLANCO PERO NO ME SALE AL 100%
TENGO EL SIGUIENTE CÓDIGO QUE POR EJEMPLO TENGO VACÍAS LA FILA 20 a la 25 ME LAS BORRA TODAS PERO MENOS LA 20 POR QUE ??? AYUDEN O SI TIENEN OTRO CÓDIGO PARA ELIMINAR FILAS EN BLANCO POR FAVOR !!!
1
2
3
4
5
6
7
8
9
10
11
12
Sub suprimir()
'Determinar la cantidad de elementos a procesar
ult = Cells(Rows.Count, 1).End(xlUp).Row
'recorrer todos los elementos
For x = ult To 1 Step -1
'condicion a evaluar
If Application.CountA(Rows(x)) = 0 Then
'Accion a realizar
Rows(x).Delete
End If
Next
End Sub
Valora esta pregunta
0