在Excel中动态选择列的范围

时间:2015-05-06 05:36:41

标签: excel vba excel-vba

我希望在A列填写工作簿的名称,直到工作表中存在数据的最后一行,我用来查找数据存在的最后一行的代码

lastRow = ActiveSheet.UsedRange.Row - 1 + ActiveSheet.UsedRange.Rows.Count

和A10列的代码库名称是

Sub testValue()

strAddress2 = "A3:A10"

wbName = ThisWorkbook.Name

Range(strAddress2).Value = Left(wbName, InStrRev(wbName, ".") - 1)

End Sub

我想动态选择范围,并将值存储在变量“lastRow”中,但不知道该怎么做

1 个答案:

答案 0 :(得分:0)

strAddress2 = "A3:A" & lastRow