资产负债表例子:奇偶行的选取

来源:百度文库 编辑:高考问答 时间:2024/04/30 14:13:42
我想在excel中快速选取奇数行或偶数行,要如何操作
可我不想删除奇数行啊,我只想选中它们,因为我的文件比较大,有500行以上,所以我不想用鼠标一行一行地去点啊

首先严重声明在修改前先备份你的文档!!!
假设:你的数据都存在Sheet1,我下面的操作将会删除Sheet1里面的奇数行。
步骤:
1。打开文件,ALT+F11切换到另外一个可编程的界面
2。把以下代码复制到右面的空白里面,代码中的20表示只处理前20行,你自己可以根据实际情况修改
Sub RowDelete()
Index = 1
For Counter = 1 To 20
Worksheets("Sheet1").Rows(Index).Delete
Index = Index + 1
Next Counter
End Sub
3。输入以上代码后,按F5执行,会跳出一个标题为macro
窗口,点击Run按钮
4。按ALT+F11切换回去
5。你将发现这时候,Sheet1里面只剩下偶数行的内容
注意:有一定风险!