Question

EXCEL VBA 复制最后一行到下一行

1。VBA
2。复制最后一行到下一行（B：W）
复制最后显示内容行到下一行（B：W）

Answer 1

i = Range("A1").End(xlDown).Row
Rows(i + 1).FillDown

追问

连续点击没反应
Sub 复制至下一行()
i = Range("A1").End(xlDown).Row
Rows(i + 1).FillDown
End Sub
连续点击没反应

追答

怎么判断最末行。

追问

（B列：W列）内容显示最后一个单元

Answer 2

什么叫 复制最后一行到下一行（B：W）

追问

复制最后显示内容行到下一行（B：W）

追答

楼下正解

追问

Sub 复制至下一行()
i = Range("A1").End(xlDown).Row
Rows(i + 1).FillDown
End Sub
连续点击没反应