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

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