Borrar filas segun 2 criterios

[estepanuno]

Hola a todos de nuevo.

Siento ser tan pesado y solo espero que pronto pueda ofrecer mi ayuda como ahora me la estais ofreciendo a mi.

En esta ocasion necesito borrar filas teniendo en cuenta 2 condiciones,en el archivo que adjunto os lo explico bien

Gracias a todos por vuestro trabajo

prueba.xls

[verzulsan]

Hola,

Sub BorradoFechaCoincidente()

    Dim Fecha As Date:  Fecha = "01/01/1990  0:00:00"

    Dim ListaLimpia As Boolean: ListaLimpia = False

    Do While ListaLimpia = False

        ListaLimpia = True

        For Each fila In ActiveSheet.UsedRange.Rows

            If Cells(fila.Row, 12) = Fecha And Cells(fila.Row, 13) = Fecha Then

                fila.Delete

                ListaLimpia = False

            End If

        Next

    Loop

End Sub[/CODE]

Saludos.

[estepanuno]

Muchisimas gracias verzulan

Si supiera como hacerlo daria el tema como finalizado

Gracias a todos

[verzulsan]

De nada,

Creo que me mola mas verzulan que verzulsan xD

Saludos