Question

VBA中如何取得行号和列号如何选定这一范围的值

VBA中如何取得行号和列号如何选定这一范围的值

Answer 1

Public Sub aaa()
'取得B5的 行号 和 列号 ，并写入数据
s = "B5"
r = Range(s).Row
c = Range(s).Column
Cells(r, c).Value = 5
'选定 A1:B5 单元格区域
Range(Cells(1, 1), Cells(r, c)).Select
'选定 A2:B5 单元格区域
Range(Range("A2"), Cells(r, c)).Select
'选定 A3:B5 单元格区域
Range([A3], Cells(r, c)).Select
'选定 B5右下方（含B5） 共2行3列 的 单元格区域，即 B5:D6
[B5].Resize(2, 3).Select
'……
End Sub

Answer 2

首先要知道行号、列号是已知还是未知的，知道行号、列号确定单元格以后，用CELLS就可以了，把下面的代码复制到VBA里面执行就看出来了：

Sub tt()
Dim a, b As Integer
a = InputBox("请输入行号")
b = InputBox("请输入列号")
Cells(a, b).Select
End Sub
这上面就是单元格选定。

Answer 3

首先你的问题问的不是很清楚 你的行号 列号是已知还是未知的？？不清楚
如果知道行号 列号确定单元格 很好实现用CELLS就可以了
你把下面的代码 复制到VBA里面执行就看出来了

Sub tt()
Dim a, b As Integer
a = InputBox("请输入行号")
b = InputBox("请输入列号")
Cells(a, b).Select
End Sub

这上面是简单的单元格选定 你问题可以再问的清楚点么 最好有个例子啥的

Answer 4

sub Show()

debug.print selection.column,selection.row
selection.entirerow.select

end sub