请问下在VBA中Range("a1").End(xltoright).column什么意思啊？

Question

在VBA中Range("a1").End(xlDown).Row和Range("a1").End(xlup).Row什么区别啊

Answer 1

在循环语句内使用的话，很容易出错，因为其值不会变化，
所以要放到循环语句前，取得最后一行的值，
另外，使用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 2

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

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

另外，使用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