VBA在行select中使用单元格值
我有一个简单的macros,复制excel工作表中的最后一行,并进一步插入文档。 目前macros只复制一行,但我想能够select复制多less行。
我的数据被中间拆分为空行,因此使用A500 End(xlUp)
和A2 End(xlDown)
Dim i As Integer i = Range("F1").Value Range("A500").End(xlUp).Offset(1).Select ActiveCell.Rows("1:3").EntireRow.Copy Range("A2").Select Selection.End(xlDown).Offset(1).EntireRow.Select Selection.Insert Shift:=xlDown Application.CutCopyMode = False
我添加了Rows("1:3")
来select三行,但是如何使用存储在F1中的数字来select要复制的行数呢?
我尝试了Rows("1:i")
但我知道它不是那样的工作。
任何指导将有助于谢谢你。
我添加了行(“1:3”)来select三行,但是如何使用存储在F1中的数字来select要复制的行数呢?
您可以使用以下
Dim NumofRows As Integer NumofRows = ActiveSheet.Range("F1").Value2 ActiveSheet.Rows("1:" &NumofRows ).EntireRow.Copy
只要保留variables的双引号
Rows("1:" & i)