从不同的工作表复制和粘贴VBA

Question

我正在尝试将数据从column B工作表中的Resource复制到TEST工作表中。

它的意思是从B7开始复制，我想要它，以便它搜索TEST中的最后一行，并使用Offset (1,0)粘贴到那里，但不是似乎按我希望的那样工作。

 Sub CopyName()
 Worksheets("TEST").Range("B" & Rows.Count).End(xlUp).Offset(1, 0) = 
 Worksheets("Resource").Range("B" & Rows.Count).End(xlUp).Value
 End Sub

Answer 1

这将

1. 从<option value="">--- Select ---</option> 到Resource的最后使用的行，从B7到
2. 将范围移动到第一个可用的非空白单元格上的Column B

---

Test