EXCEL : 求VBA选中 不连续两列中 的部分单元格
EXCEL:求VBA选中不连续两列中的部分单元格如A2:Ai和B2:Bi同时选中。其中的i是一个要给的参数急用,求解。。。。。在线等待。。。。...
EXCEL : 求VBA选中 不连续两列中 的部分单元格
如 A2:A i 和 B2:B i 同时选中 。 其中的 i 是一个要给的参数
急用,求解。。。。。在线等待。。。。 展开
如 A2:A i 和 B2:B i 同时选中 。 其中的 i 是一个要给的参数
急用,求解。。。。。在线等待。。。。 展开
6个回答
展开全部
在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
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
展开全部
Sub test()
Dim c As Range
Set c = c.Select
End Sub
我要用变量来表示,不是直接set c=Union([a1], [b2], [c5]),这里的[A1],[b2],[c5] 要变量,为满足条件的单元格
Dim c As Range
Set c = c.Select
End Sub
我要用变量来表示,不是直接set c=Union([a1], [b2], [c5]),这里的[A1],[b2],[c5] 要变量,为满足条件的单元格
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
展开全部
第一个回答者的公式 Range("A2:A" & i, "B2:B" & i).Select
改为Range("A2:A" & i & ",B2:B" & i).Select
用 & 连接,“,”属于文本。
改为Range("A2:A" & i & ",B2:B" & i).Select
用 & 连接,“,”属于文本。
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
展开全部
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列
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列
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
展开全部
range("A2:A" & i).select
range("B2:B" & i).select
同时选中
Range("A2:A" & i, "B2:B" & i).Select
range("B2:B" & i).select
同时选中
Range("A2:A" & i, "B2:B" & i).Select
更多追问追答
追问
这样不能实现 同时 选中 两列
帮我想想拜托
追答
Range("A2:A" & i, "B2:B" & i).Select
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询