Set qy = Union(qy2, qy3, qy4)中,如果qy3为空怎么办?
时间: 2024-03-02 19:49:55 浏览: 61
如果 qy3 为空,只需将其从 Union 方法中移除即可。具体来说,可以使用如下代码:
```
If fw2 <> "" And fw3 <> "" And fw4 <> "" Then
Set qy2 = Range(fw2)
If Not IsEmpty(Range(fw3)) Then
Set qy3 = Range(fw3)
Set qy = Union(qy2, qy3, qy4)
Else
Set qy = Union(qy2, qy4)
End If
ElseIf fw2 <> "" And fw3 <> "" Then
Set qy2 = Range(fw2)
If Not IsEmpty(Range(fw3)) Then
Set qy3 = Range(fw3)
Set qy = Union(qy2, qy3)
Else
Set qy = qy2
End If
ElseIf fw2 <> "" Then
Set qy2 = Range(fw2)
Set qy = qy2
Else
Set qy1 = Range(fw1)
Set qy = qy1
End If
```
这样,在判断 fw2、fw3、fw4 是否为空时,先使用 IsEmpty 函数判断 fw3 是否为空,如果为空,则将 qy3 从 Union 方法中移除。这样可以保证当 fw3 为空时,qy2 和 qy4 仍能被选取到,并将它们的单元格背景色设置为黄色。
阅读全文