EXCEL中如何使用VBA清除特定行内容

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行。

1、双击thisbook——打开工作簿的代码编辑框。

2、复制进去如下代码。

3、画好一个按钮框以后，软件让你给它指定宏代码，选择产生目录啦。

4、点击一下获取目录，目录就产生了。

5、对目录进行筛选，排序，也可以手工排序。

6、然后再在代码编辑框输入这些代码。

7、然后再画一个按钮，指定sortsheet。

8、改好按钮名称后就是这样的啦，按一下按钮。