【发布时间】:2015-03-03 05:35:54
【问题描述】:
我想在作为工作表一部分的表格上运行宏,它从 A18 到 J33,第 18 行是标题。 宏应隐藏 J 列单元格中为零的行。
请帮忙!!!!!!
【问题讨论】:
-
要求代码的问题必须表明对所解决问题的最低理解。包括尝试的解决方案、它们为什么不起作用以及预期的结果。另见:Stack Overflow question checklist
我想在作为工作表一部分的表格上运行宏,它从 A18 到 J33,第 18 行是标题。 宏应隐藏 J 列单元格中为零的行。
请帮忙!!!!!!
【问题讨论】:
当您看到您的电子表格时,点击 ALT+F11。这将为您打开 VBE(Visual Basic 编辑器)。
右键单击VBA Project Explorer(如果看不到,请单击查看 -> 项目资源管理器或 CTRL+R
插入一个模块
复制并粘贴以下代码
Sub HideRows()
Dim cell As Range
For Each cell In Range("J19:J33")
If Not isEmpty(cell) Then
If cell.Value = 0 Then
cell.EntireRow.Hidden = True
End If
End If
Next
End Sub
按 F5 运行宏。
之前
之后
【讨论】:
J 单元格。你可能想把它改成If cell.Value <> "" And cell.Value = 0 Then ?