EXCEL : 求VBA选中 不连续两列中 的部分单元格

Question

EXCEL : 求VBA选中 不连续两列中 的部分单元格
如 A2：A i 和 B2：B i 同时选中 。 其中的 i 是一个要给的参数

急用，求解。。。。。在线等待。。。。

Answer 1

在VBA中选择单元格使用range.select

Range支持不连续的多区域，表示方式为，Range（区域A1地址，区域B地址,……）
例如：A列中的A2：A3和C列中的C3:C9,是不连续的两列
那么同时选择两部分，则可以表示为Range("A2：A3,C3:C9")

VBA代码中具体使用如下：
sub Main
dim rng as range
'区域赋给rng
set rng=Range("A2：A3,C3:C9")
'区域选择
rng.select

end sub

Answer 2

Sub test()
Dim c As Range
Set c = c.Select
End Sub
我要用变量来表示，不是直接set c=Union([a1], [b2], [c5]),这里的[A1],[b2],[c5] 要变量，为满足条件的单元格

Answer 3

第一个回答者的公式 Range("A2:A" & i, "B2:B" & i).Select
改为Range("A2:A" & i & ",B2:B" & i).Select
用 & 连接，“,”属于文本。

Answer 4

Sub ASASAS()
Dim Lon As Worksheet
Dim k As Integer
Set Lon = Worksheets("SHEET1")'你的表名称
For k = 1 To 30
If Lon.Cells(1, k) > 0.00000000001 And Lon.Cells(3, k) > 0.0000000001 Then
Lon.Cells(2, k) = (Lon.Cells(1, k) + Lon.Cells(3, k)) / 2
End If
Next
End Sub

A 为第1列
C 为第3列

结果在B列

Answer 5

range("A2:A" & i).select
range("B2:B" & i).select
同时选中
Range("A2:A" & i, "B2:B" & i).Select追问

这样不能实现 同时 选中 两列
帮我想想拜托

追答

Range("A2:A" & i, "B2:B" & i).Select

追问

还是不对， 如果把B改成F ，那么其中间的列也被 选中了
我其实是为了画出这样数据的图 ，但是不知如何引用，这样的数据
如果知道如何绘这样 数据的图的代码也可以

拜托