Eliminar mas de un millón de filas vacías

[Pirtrafilla]

Buenas tardes a todos.

Tengo un fichero donde la hoja en la que tengo los datos y de la que otras hojas tienen formulas sobre esta, contiene más de un millón de filas.
Resulta que copia una hoja...

Para poder visualizar el resto de este tema y sus adjuntos:
. Si nunca te has registrado puedes registrarte gratis aquí
. Si ya te has registrado debes iniciar sesión aquí

 

[Macro Antonio]

Prueba con esta macro, he dado por supuesto que tienes datos en la columna A.

Sub EliminarExcesoFilas()
Range(Range("A1").End(xlDown).Offset(1).Row & ":" & Rows.Count).Delete
End Sub...

Para poder visualizar el resto de este tema y sus adjuntos:
. Si nunca te has registrado puedes registrarte gratis aquí
. Si ya te has registrado debes iniciar sesión aquí

 

[Pirtrafilla]

Prueba con esta macro, he dado por supuesto que tienes datos en la columna A.

Sub EliminarExcesoFilas()...

Para poder visualizar el resto de este tema y sus adjuntos:
. Si nunca te has registrado puedes registrarte gratis aquí
. Si ya te has registrado debes iniciar sesión aquí

 

[Macro Antonio]

Sube el archivo a un servidor externo, compártelo y adjunta el enlace.

 

[Victor A. Paulin]

Prueba esto y lo puedes adaptar

Sub Elimina_Filas_Vacias2()
    Application.ScreenUpdating = False: Application.DisplayAlerts = False
    n = ActiveSheet.UsedRange.Rows.Count
    Rows(1 &...

Para poder visualizar el resto de este tema y sus adjuntos:
. Si nunca te has registrado puedes registrarte gratis aquí
. Si ya te has registrado debes iniciar sesión aquí

 

[Gabriel Raigosa]

Hola,

He notado que eso le ha pasado a algunos usuarios en sus tablas, bases de datos, supongamos que la columna A tiene datos hasta la fila 9600, mas allá de ella no debe haber mas, y algunas...

Para poder visualizar el resto de este tema y sus adjuntos:
. Si nunca te has registrado puedes registrarte gratis aquí
. Si ya te has registrado debes iniciar sesión aquí

 

[Pirtrafilla]

Gracias por el código, pero no las elimina.

Estoy probando con este otro código, pero se queda el ordenador ejecutando la macro horas y en unas...

Para poder visualizar el resto de este tema y sus adjuntos:
. Si nunca te has registrado puedes registrarte gratis aquí
. Si ya te has registrado debes iniciar sesión aquí

 

[Pirtrafilla]

Hola,

He notado que eso le ha pasado a algunos usuarios en sus tablas, bases de datos, supongamos que la columna A tiene datos hasta la fila...

Para poder visualizar el resto de este tema y sus adjuntos:
. Si nunca te has registrado puedes registrarte gratis aquí
. Si ya te has registrado debes iniciar sesión aquí

 

[Gabriel Raigosa]

algo he hecho mal.

Puede que lo hayas hecho bien, libros misteriosos, a mi siempre me genera curiosidad de como es que los libros...

Para poder visualizar el resto de este tema y sus adjuntos:
. Si nunca te has registrado puedes registrarte gratis aquí
. Si ya te has registrado debes iniciar sesión aquí

 

[Pirtrafilla]

Prueba esto y lo puedes adaptar

Sub Elimina_Filas_Vacias2()
    Application.ScreenUpdating = False: Application.DisplayAlerts = False...

Para poder visualizar el resto de este tema y sus adjuntos:
. Si nunca te has registrado puedes registrarte gratis aquí
. Si ya te has registrado debes iniciar sesión aquí

 

[Pirtrafilla]

No da un error de no haber definido la variable.

Victor, lo he adaptado, pero tampoco me borraba las lineas. Si no lo adapto me lo borra...

Para poder visualizar el resto de este tema y sus adjuntos:
. Si nunca te has registrado puedes registrarte gratis aquí
. Si ya te has registrado debes iniciar sesión aquí

 

[Héctor Miguel]

lo solucioné con la macro que comenté antes. Eso sí, muy lento...

prueba con una macro ± como esta:

Sub deleteUnusedRows()
'...

Para poder visualizar el resto de este tema y sus adjuntos:
. Si nunca te has registrado puedes registrarte gratis aquí
. Si ya te has registrado debes iniciar sesión aquí

 

[Pirtrafilla]

prueba con una macro ± como esta:

Sub deleteUnusedRows()
' procedimiento para eliminar las filas 'sobrantes' (SIN datos reales) de la...

Para poder visualizar el resto de este tema y sus adjuntos:
. Si nunca te has registrado puedes registrarte gratis aquí
. Si ya te has registrado debes iniciar sesión aquí