打开EXCEL文件,按ALT+F11,左侧有“模块”,右键—插入模块,将下面的代码复制粘贴到里面。保存后关闭,在EXCEL文件上点击工具——宏——宏,会有对话框,找到Hidden并选中,点击运行就行了。
Sub Hidden()
For i = 1 To 63350 Step 1
If Cells(i, 1).Value = 0 Then
Cells(i, 1).EntireRow.Hidden = True
End If
Next i
End Sub
上述代码可以根据自己的需要将63350改为100或1000,即是需要扫描多少行,数字越大运行时间越长。
选中A列,——数据——自动筛选,这是A列最上方右面有一个倒三角,点击倒三角,最下面有一个“(自定义)”,选中他,出现“自定义自动筛选方式”对话框,在“显示行”左侧找到“不等于”,右侧输入“0”;确定,于是就实现了你的愿望了。祝你好运。
你可以用自动筛选功能呀!