Excel 在另一个数据集下添加5列数据-下一个空行

我试图把两个不同的数据集放在一起，但这对我来说不起作用。这是代码

Sheets("Event Data").Select
    Range("S:S,T:T,U:U,AA:AA,N:N").Select
    Range("Table_Query_from_PostgreSQL35W[[#Headers],[site_name]]").Activate
    Selection.Copy
    Sheets("Staff List").Select
    Range("A1:E1").Select
    ActiveSheet.Paste
    Application.CutCopyMode = False

 Sheets("Anon").Select
    Range("A:A,D:D,O:O,P:P,Q:Q").Select
    Range("P2").Activate
    Selection.Copy
    Sheets("Staff List").Select
    **Range("A2:E2").Select**
    ActiveSheet.Paste
    Application.CutCopyMode = False

---

我知道这是不对的。我遇到的问题是选择第一个空行（我可以对一行执行此操作），但选择多行（A:E）。我正在快速寻找解决方案。谢谢。

对于A:E try中的下一个空白行

dim nr as long
with workSheets("Staff List")
  nr = application.max(.cells(.rows.count, "A").end(xlup).offset(1, 0).row, _
                       .cells(.rows.count, "B").end(xlup).offset(1, 0).row, _
                       .cells(.rows.count, "C").end(xlup).offset(1, 0).row, _
                       .cells(.rows.count, "D").end(xlup).offset(1, 0).row, _
                       .cells(.rows.count, "E").end(xlup).offset(1, 0).row)
  .cells(nr, "A").paste
end with

上述代码替换以下代码行：

Sheets("Staff List").Select
**Range("A2:E2").Select**
ActiveSheet.Paste

---

那么，我将在哪里/如何使用它呢？我一把它放进去就会出现语法错误。“语句的预期结尾”显然，我不知何故双重输入了一个结束括号；你也许应该能弄明白。还有人能解决我的问题吗？我解释得很糟糕。我再试一次。第一个数据集，即代码或“事件数据”数据的顶部集，当前为467行，但会增加。我希望第二个数据集，来自“Anon”的数据，在“事件数据”数据之后直接进入“员工名单”表。