在一个工作表中A8至Q1800范围内，如果I行至P行为空，Q行为零的时候，只要满足此条件此行隐藏。这样的代码在一个模块中如何写出？
VBA宏代码问题？
答案:2 悬赏:0 手机版
解决时间 2021-05-18 16:02
- 提问者网友：缘字诀
- 2021-05-18 10:02
最佳答案
- 五星知识达人网友：酒安江南
- 2021-05-18 11:14
For i = 8 To 1800
For j = 12 To 16 'I列到P
If Worksheets(1).Cells(i, j) = "" And Worksheets(1).Cells(i, 17).Value = 0 Then '判断第17列既Q列和8行P列的值
k = 1
End If
Next j
If k = 1 Then
Rows(i).EntireRow.Hidden = True '隐藏对应的行
k = 0
End If
Next i
在什么时候隐藏,就把代码放哪里
全部回答
- 1楼网友：怙棘
- 2021-05-18 12:25
循环再循环，判断一下，很简单
我要举报
如以上回答内容为低俗、色情、不良、暴力、侵权、涉及违法等信息，可以点下面链接进行举报！
点此我要举报以上问答信息
大家都在看
推荐资讯