Hallo,
das kannst du mit einem Makro machen.
Das folgende Makro gehört in ein [url=
http://www.excelbeispiele.de/Modul.htm]Standardmodul[/url] der betreffenden Arbeitsmappe:
[code]Sub sekunden_loeschen()
Dim lngLetzte As Long
Dim lngZeile As Long
'Bildschirmaktualisierung ausschalten:
Application.ScreenUpdating = False
'letzte Zeile im aktiven Blatt in Spalte A ermitteln
lngLetzte = ActiveSheet.Cells(Rows.Count, 1).End(xlUp).Row
'Zeilen ab Zeile 1 durchlaufen
For lngZeile = lngLetzte To 1 Step -1
'falls Sekunden größer Null, dann Zeile löschen
If Second(Cells(lngZeile, 1).Value) <> 0 Then Rows(lngZeile).EntireRow.Delete
Next lngZeile
'Bildschirmaktualisierung einschalten:
Application.ScreenUpdating = True
End Sub[/code]
Probier das aber erst einmal in einer Testmappe aus.
Ich gehe davon aus, dass die Zeit in Spalte A ab Zeile 1 ohne Überschrift steht.
Gruß
M.O.
