EXCEL VBA代码的编写

来源:百度知道 编辑:UC知道 时间:2024/05/17 23:50:50
有哪们大侠能帮我写出VBA代码。就是当某列单无格的值在大于或等于零时,将自动删除这行。如:

A B C
1 应完成 实际完成 完成情况
2 25 12 -13
3 36 36 0
4 42 46 4
5 43 50 7
也就是当C3,C4,C5已完成了任务,现要自动把它删除整行。

按alt+F11进入VBA编辑器,双击左边的你要编辑的工作表名称打开其代码窗口,在里面输入:
Sub test()
For i = 1 To 1000
If Cells(i, 3) >= 0 Then
Cells(i, 1).EntireRow.Delete
End If
Next i
End Sub

按F5运行。