Excel宏 - 计算插入的行

Question

我正在将数据从一张纸复制到另一张，我有一个通用计数器，x。

    x = 2
    Sheets("Info").Select
    Range("B2:B6").Copy Destination:=Sheets("GreatIdea").Range("A" & x)
    x = x + 1

所以我插入5行，以下字段获取数据; A2，A3，A4，A5，A6。

    x is currently 3
    Sheets("Info").Select
    Range("B10").Copy Destination:=Sheets("GreatIdea").Range("A" & x)

现在插入1行，但是单元格A3将覆盖其数据。如何添加“x”以及上一个副本中添加的字段数。所以'x'变成7？

非常感谢！

Answer 1

您可以使用Rows.Count

x = x + Range("B2:B6").Rows.Count