Actividad pública reciente
Ha valorado "Excelente" la respuesta
Como eliminar las filas
Dim R as Long For R = 1 to Range("F" & Rows.Count).End(xlUp).Row If Cells(R, "F") = 0 Then Cells(R, "F").EntireRow.Delete Next