Ejecutar macro indefinidamente

[N+1]

Buenas tardes a todos,

estaba ejecutando una macro para eliminar celda y fila superior, funciona bien pero no logro que se ejecute indefinidamente hasta que deje de hallar el target, no se si es mejor utilizar un Do While Loop en la estructura del código, adjunto el excel tal y como lo tengo actualmente.

muchas gracias

Eliminar.xltm

[smart27]

Mira este codigo lo uso para lo mismo, el hecho de que este eliminado filas, puede que tarde mucho la macro leyendo y buscando, este macro  filtra  y elimina lo que especifiques y lo hace en segundos!!!

ya solo al ultimo tu ordenas tu informacion 

Espero que te sirva

 

http://www.mediafire.com/file/o5sgx44dgzw79mh/eliminar2.xltm

[Antoni]

Para menos de 5.000 filas te vale con esto:

Sub EliminarFila()
Application.ScreenUpdating = False
For x = Range("A" & Rows.Count).End(xlUp).Row To 2 Step -1
   If Range("A" & x) = "Buenas tardes" Then
      Rows(x - 1).Delete
      x = x - 1
   End If
Next
End Sub

 

[Enigma25]

Cerrado por abandono.