Sletning af linier

Prøv med denne makro:

Sub sletlinieværdi()

  Application.ScreenUpdating = False 'Undlad opdatering af skærm
  Dim lngRow As Long, lngLastRow As Long
  lngLastRow = Cells(Rows.Count, "A").End(xlUp).Row 'Find sidste celle i Kollone A, ret evt. til en anden
  For lngRow = lngLastRow To 1 Step -1
  If Cells(lngRow, "A").Value = "<søgetekst>" Then 'Erstat søgetekst med den tekst der skal søges på og evt hvilken Kollone (A)
        Cells(lngRow, "A").EntireRow.Delete 'Erstat evt hvilken Kollone (A)
    End If
  Next lngRow
  Application.ScreenUpdating = True 'Sæt opdatering af skærm tilbage

End Sub

tobler << uha, lide mere advanceret end jeg lige havde troet. Hvor skal jeg indsætte den makro og hvordan afspiller jeg den?

I dit regneark trykker du Alt+F11, så kommer VBA editoren frem, vælg "this workbook" og indsæt ovenstående kode, så ændrer du evt. kolonne og erstatter <søgetekst> med din værdi. Gem/Save dit regneark.
I dit regneark trykker du nu Alt+F8, prikker på makroen "sletlinieværdi" og vælger kør/run.

Du kan læse mere om VBA her:
http://www.win-consult.com/Downloads/Guide/SmartOffice%20-%20Visual%20Basic%20Editor%20i%20Excel.pdf

jeg siger mange tak for hjælpen :-)
Hvis du laver et svar så får du lidt points.

Her er et svar:-)