Question

在VBA中Range("a1").End(xlDown).Row

在VBA中Range("a1").End(xlDown).Row和Range("a1").End(xlup).Row什么区别啊
还有在VBA中Range("a1").End(xltoright).column什么意思啊谢谢啦

Answer 1

如果你在循环语句中使用它，很容易出错，因为值没有改变，

所以要放到循环语句前，取得最后一行的值，

另外，使用Range（＂a1＂）．End（xlDown）．Row如果A列第一行下面全为空，

则得到表的最后一行65536，容易出错，

建议使用Range（＂a65536＂）．End（xlUp）．Row

Suba（）

DimiAsLong

DimrAsLong

r＝Range（＂a1＂）．End（xlDown）．Row

Fori＝1To10

r＝r＋1

Cells（r，1）＝i

Nexti

EndSub

扩展资料：

注意事项：

以C语言为例，for循环的一般形式为：

（语句1；语句2；3）声明

要执行，执行语句1一次（注意只有一次）

然后判断表述二是否正确

1．如果建立了循环体，则执行语句3。返回语句2来确定条件是否为真？语句3在循环体建立之后执行，直到没有建立循环体为止

2．如果语句2不为真，则不会执行循环体，也不会执行语句3。

Answer 2

在循环语句内使用的话，很容易出错，因为其值不会变化，
所以要放到循环语句前，取得最后一行的值，
另外，使用Range("a1").End(xlDown).Row如果A列第一行下面全为空，
则得到表的最后一行65536，容易出错，
建议使用Range("a65536").End(xlUp).Row
Sub a()
Dim i As Long
Dim r As Long
r = Range("a1").End(xlDown).Row
For i = 1 To 10
r = r + 1
Cells(r, 1) = i
Next i
End Sub

Answer 3

在循环语句内使用的话，很容易出错，因为其值不会变化，
所以要放到循环语句前，取得最后一行的值，
另外，使用Range("a1").End(xlDown).Row如果A列第一行下面全为空，
则得到表的最后一行65536，容易出错，
建议使用Range("a65536").End(xlUp).Row
Sub a()
Dim i As Long
Dim r As Long
r = Range("a1").End(xlDown).Row
For i = 1 To 10
r = r + 1
Cells(r, 1) = i
Next i
End Sub