如何在VBA中的特定行集內複製數據？

我想將數據從一張紙（sheet1）複製到另一張紙（sheet2），但我需要將數據放置在定義的一組行中的下一個空單元中。例如;如何在VBA中的特定行集內複製數據？

我想將數據複製到通過A9細胞A10和A30，但單元格A1中的下一個可用的電池都是空白

我知道，這將在未來可用的單元格複製代碼，直到A31，但我不希望它包括A1到A9

.Range("A30").End(xlUp).Offset(1).PasteSpecial

任何人都可以幫忙請嗎？

2017-02-23 Amena56

您沒有說明如果沒有空白單元格A10會發生什麼：A30。插入一行？覆蓋A10或A30或其他一些隨機行？ – Jeeped

這些行應該是空白的，因爲有一個重置按鈕，如果它們不是空白，它將清除這些單元格。我需要它將數據添加到這些行中的下一個可用單元格（A10：A30） – Amena56

你可以嘗試：

.Range("A" & WorksheetFunction.Max(10, .Range("A30").End(xlUp).Row)).Offset(1).PasteSpecial

2017-02-23 04:56:26 user3598756

這給了我一個無效的引用錯誤 – Amena56

我給你的語句插入到與你的問題相同的「環境」中，即與一個領先的「點」，這意味着你在一個「With ... End With」塊中。如果不是這樣，那麼在 – user3598756

@ Amena56上顯示所有相關的代碼在哪裏插入單個語句，你是否明白了？ – user3598756

回答