由于实时数据更新,工作表正在大幅增长

我有电力阅读设备,可以更新从服务器每秒的功率变化到Excel工作表。 我正在运行一个Java程序,它可以访问这个实时数据用于我的调度目的,但是当我访问Excel时,我只需要最后更新的数据。 由于数据每秒都在更新,Excel工作表正在大幅增长。

有没有什么方法可以在Excel工作表或任何工具的帮助下编程删除超出特定限制的所有旧数据,同时保存最近十次左右的最新更新读数(我不想当我的程序试图访问最后一行数据时,任何时候都会返回null – 所以Excel中总是有读数)?

这一点代码将保留最后10行。 假设是每次工作表变化时都会启动。

代码进入工作表模块。

在这里输入图像说明

Private Sub Worksheet_Change(ByVal Target As Range) KeepLst10Rws End Sub Sub KeepLst10Rws() Dim rws As Long rws = Cells(Rows.Count, "A").End(xlUp).Row If rws > 10 Then Rows("1:" & (rws - 10)).Delete End If End Sub