在macro中使用if循环时,如果if条件有多个,可以用 And 和 Or 来连接。
For i = 13 To 52
If sh.Range("B" & i).Text = "" And sh.Range("D" & i).Text = "" And sh.Range("F" & i).Text = "" And sh.Range("H" & i).Text = "" Then
sh.Range("B" & i).EntireRow.Hidden = True
Else
sh.Range("B" & i).EntireRow.Hidden = False
End If
Next