作者cos145 (more)
看板Visual_Basic
标题[VBA ] 回传一行资料中最後一个资料的列数
时间Sat Jun 8 23:27:53 2019
要回传A行资料中，最後一个资料的列数
任一储存格键入=LOOKUP(2,1/(A:A<>""),ROW(A:A))就可以得到一个数字
但是，把函数写成VBA时
我想把这个数字存到A，但不知道上面这个lookup code 怎样转写成VBA
Dim X As Integer
X = WorksheetFunction.Lookup(2, ??, Range("A:A"))
请教各位
--
※ 发信站: 批踢踢实业坊(ptt.cc), 来自: 110.50.145.27 (台湾)
※ 文章网址: https://webptt.com/cn.aspx?n=bbs/Visual_Basic/M.1560007675.A.75B.html
1F：推 MashiroX421: x=cells(1048576,1).end(xlup) 06/09 17:49
2F：→ cos145: 查到了，要取行号应该是上面的程式码再加上属性.Row 06/10 00:10
4F：→ paul60209: LR=Activesheet.Cells(1048576,"A").End(xlUp).Row 06/13 09:00