Vba 每隔3分钟将数据（特定范围）保存到Excel中的单独工作表中

下面的代码将值从图纸1上的D2和E2复制到图纸2上的D2和E2，并在每10分钟复制一行时在图纸2上添加一行

是否有任何方法可以使用特定范围，而不是选择单元格D2和E2，并将该数据保存在第2页添加新行

Sub CopyValues()
Dim RowNo As Long
RowNo = Sheets(2).Cells(Rows.Count, 4).End(xlUp).Row + 1

     Sheets(2).Cells(RowNo, 4) = Sheets(1).Cells(2, 4)
     Sheets(2).Cells(RowNo, 5) = Sheets(1).Cells(2, 5)

Application.OnTime Now + TimeValue("00:03:00"), "CopyValues"

End Sub

---

你现在所做的对我来说已经足够具体了。具体来说，这是什么意思？我有每3分钟更新一次的库存量数据，我想每3分钟将数据复制到sheet2。要从下一行粘贴数据，如（行+1），上面的代码工作正常，但它只复制2个单元格的数据，我想要一个范围，如（“D1:H10”），一个完整的多值范围，基本上需要构建一个动态范围。这里有一个帖子可以帮你做到这一点-。一旦你建立了你的范围，你就可以将它合并到你的代码中。很抱歉，动态范围可能不起作用，因为sheet1范围是固定的，只是更新了值。简单地说，我只想在间隔内复制sheet1值并将它们粘贴到sheet2中