软件:Excel
https://imgur.com/a/oJcO80u
红色框框的程式我是用录制的
我在Q2下公式(如图)
然后点Q2储存格的右下角自动填满
但是每次资料的列数不固定，所以我只好先用了个不可能达到的65536
要怎么改写能够每次依照资料的列数去自动填满?

如要取得最后一笔有值的储存格range.end、range.find要列号的话range.row；若资料为连续资料的话也可用工作表函数counta或count(数字)

小弟只会用录的..s大可以在指点一下吗?

google range.end、range.find就可以看到写法了工作表函数就加上worksheetfunction.counta或count就会有

好~我来试试看! 谢谢S大

接着就是看要以储存格方式或列号，储存格的话range("q2",储存格)；列号的话range("q2:q"&列号)