请教EXCEL高手！如何一起选中带有特定值的行？

来源：百度知道 编辑：UC知道 时间：2024/05/28 00:02:54
一个EXCEL表中很多行中都含有“Z”，我想用VBA程序一次将这些行选中，请问该怎么做呢？

另外，如果A3=Z，则A2=B1用VBA程序该怎么写呢？

刚刚了解到VB，还没有系统学习，所以请教各位大侠！！多谢！

这个问题看起来简单，其实比较麻烦，并且是0分，怪不得没有人回答。
看一下下面代码吧：

'先第二个问题

If Range("A3") = "Z" Then
Range("A2") = Range("B1")
'或Cells(2, 1) = Cells(1, 2)
End If

'第一个问题
Dim MyRange As Range
Dim IsHave As Boolean
IsHave = False
For i = 1 To 10

If Cells(i, 1) = "Z" Then
'本例选择第一个单元格为“Z”的行
If IsHave Then
Set MyRange = Union(MyRange, Rows(i)) 'Range的Union 方法是第一个问题的关键

Else
Set MyRange = Rows(i)
IsHave = True
End If

End If

Next i

If IsHave Then
MyRange.Select '执行选择操作
End If