2011-03-16 69 views
0

我正在將數據從一個表格複製到另一個表格,並且我有一個通用計數器x。Excel宏 - 計數插入的行

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?

非常感謝!

回答

1

您可以使用Rows.Count

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

赫然工作! – CustomX 2011-03-17 10:00:17

+0

有沒有辦法擴展它,所以可以說B2:B5包含數據,但B6是空的,我不希望它在計數中使用B6。這可能嗎? – CustomX 2011-03-17 10:10:41

+0

嗯......我想不出一個可以做到的單行事件,但它可能會帶來一個單獨的功能。使用'for each'循環,並檢查vbNullString – Dave 2011-03-17 15:08:38