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

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将在下面插入一行而不更改选择。