插入行而不选择任何东西？

Question

我在VBA工作，想在不选择的情况下在特定位置插入一行。 我遇到的问题是，在选择行之后，当脚本运行完毕后，电子表格会向下滚动到该行。我希望能够在不将电子表格向下滚动到插入行的情况下执行此操作。

Rows(i & ":" & i).Select
ActiveCell.EntireRow.Insert

我不想选择A1来到顶部。

Answer 1

这样做：

Cells(i,1).EntireRow.Insert

将操作直接应用到所需范围，而不是先将其选中并将操作应用于“Activecell”。

一些补充说明：

• “记录宏”功能会像您的示例一样生成代码，但我发现在编写自己的代码时很少需要提前选择单元格。
• 附带好处：直接在电池上操作而不是先选择它可以将代码速度提高10倍到100倍!!

Answer 2

Rows(i & ":" & i).Insert会在不更改选择的情况下在下方插入一行。