所以我知道如何让VBA弄清楚最后一行是什么,最后一列是什么,添加+1以转到下一个空行或列。我想要做的是在最后一列旁边的列中插入一个公式,即空列,但只在第2行到最后一行。似乎无法使用Range()获取它,因为lastColumn变量是一个数字;不能使用Cells(),因为它不会采用范围“2:”lastRow。有什么建议吗?
编辑:建议重复的链接不能解决我的问题。用户没有阅读或理解我的问题。
答案 0 :(得分:2)
您也可以使用范围调用中的单元格,但需要
范围(单元格(2,lastcolumn + 1),单元格(lastrow,lastcolumn + 1))。公式=“= sum(1,1)”
如果A是最后一列,那么它与范围(“B2:B”和“lastrow”)相同
答案 1 :(得分:1)
您可以将Cell用于第一个单元格,然后调整范围
Cells(2,lastColumn+1).Resize(lastRow-2+1,1)
更为苛刻的解决方案
Range(Letter(lastColumn+1) & 2 & ":" & Letter(lastColumn+1) & lastRow)
Function Letter(dim columnNumber as long)
Letter=Split(Worksheets(1).Cells(1,columnNumber).Address, "$")(1)
End function