如何每10分钟发送一次数据以在Excel中分隔工作表？

我有一个工作表，其实际数据的货币价值相对于每10分钟在单元格e2中更新的美元和单元格d2中的实时时钟。 我想在另一个工作表中每隔10分钟logging一次这两个值，所以我有一个每日波动的价值的帐户。 做这个的最好方式是什么？

感谢您的帮助。

Answer 1

这会将Sheet1上D2和E2的值复制到Sheet2上的D2和E2上，每次复制一行时都会在Sheet2上添加一个新行。

它会每10分钟自动运行一次。

 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:10:00"), "CopyValues" End Sub