我想 select 动态单元格并自动填充到最后一行

I want to select the dynamic cell and autofill it till the last row

该值在单元格 C 和 lastrow2 中,想要自动填充到 lastrow3

Range("C" & lastrow2).Select
Selection.AutoFill Destination:=Range(.Cells(lastrow2, 3), .Cells(lastrow3, 3)).FillDown

而不是 .Select 然后 Autofill,您可以一次填充整个范围。这是你正在尝试的吗?

ws.Range(ws.Cells(lastrow2, 3), ws.Cells(lastrow3, 3)).Formula = _
ws.Cells(lastrow2, 3).Formula

其中 ws 是您的相关 sheet。例如

Dim ws As Worksheet
Set ws = Sheet1