如何在VBA excel中使用最后一行的概念来粘贴数据

我有A2到D2的数据,在E列我有数据(这将通过链接每天 – 有一天它将是3000或4000或5000等)。

所以我要findE列的最后一行,把A2的数据粘贴到D2最后一行。

单程:

Range("A2:D2").Copy Destination:=Range("A3:D" & Cells(Rows.Count, "E").End(xlUp).Row)