vba编程中，怎么在for循环中提取单元格的行号

2025-02-22 11:47:28

推荐回答（3个）

回答1：

楼上回答很好，但是不知道你是否是想知道如何获得A1、A2......等，可以这样处理：
1、定义两个变量，分别为字符型和整数型:
Dim s As String
Dim i As Integer
2、在循环中引用这些变量进行运算即可
for i=1 to 10
s="A" & i
range(s).select
……
next i

回答2：

for each 循环：

for each c in range("a1:b2")
msgbox c.row
next
----------
普通FOR循环：
for i = 1 to 2
for j = 1 to 2
msgbox cells(i,j).row
next j,i

回答3：

比如在当前活动工作表A1:A10单元格遍历循环
sub rngfor()
dim rng as range
for each rng in range("a1:a10")
msgbox "单元格值:" & rng.value & "的行号是:" & rng.row
next
end sub