-
二轉會員
2019-2-14 13:51#1
如range”c1:c80”
C1非空白
c2空白
C3空白
c4非空白
c5非空白
c6到c80空白
以上情況我想自動隱藏空白的c3但c2不用
而c4中間要加一行空白的行
我該如何set 才可以不會清一色空白就隱藏？
我原本是
Dim c as range
Application.screenupdating = False
For Each c In Range(“c1:c80”)
If c.value = 0 or c.value = “ “ then
C. Entirerow.hidden = true
Else
C.entirerow.hidden = false
End if
Next c
Application.screenupdating = true
我應該如何改才可以有我以上說的隔行效果？
感謝大大