写作范围在Excel中。

colname = Split(Cells(, i).Address, "$")(1) Lastrow = .Cells(.Rows.Count, colname).End(xlUp).Row ws.("?" & Lastrow).Copy ws1.Cells(Rows.Count, "A").End(xlUp).Offset(1, 0) 

我是一个数字，它被转换成列名。 我需要从数字4开始的范围，例如，如果我= 1，我需要范围（“A4”和拉斯特罗） 。 我有lastrow，我可以得到A，但我怎么做到A4

Answer 1

 Dim ws as Worksheet Dim Row as integer Dim Col as integer Row = 4 Col = 1 Range(Cells(Row, Col), cells(LastRow, Col)) ws.Range(Cells(Row, Col), Cells(LastRow, Col))