VBA中删除指定一行以及从这行开始所以数据怎么写

Dim rg As Range

endrow = Range("A65536").End(xlUp).Row

For Each rg In Range("A1:A" &endrow)

If rg = "指定内容" Then

rg.EntireRow.Delete

End If

Next

End Sub

大概是这个意思么？

For k = 1000 To 60 Step -1

    If (Cells(k, 1) = -5 And Cells(k, 2) = 80) Or (Cells(k, 1) = 25 And Cells(k, 2) = 64) Then

        Cells(k, 1).EntireRow.ClearContents

    End If

Next

End Sub

功能区域为第60-1000行。