Excel的麻烦 – 如何将15分钟的数据传输到10分钟的数据
我有一个大的Excel工作表,从一个风电场的传感器获取数据。
它在一列之下,一个在另一列之下,只是一个干净的整数(例子1435)。 这些列表示每15分钟的数据。
我需要从中获取数据并将其转换为10分钟的数据。
我的想法是把它除以3(得到5分钟的数据),只是增加其中两个。
但我需要在Excel中的公式,在另一列做。
- 所以拿第一栏
- 除以3,
- 把它放在旁边的列中,
- 把它复制到下面的2行
- 然后重复这个程序,但在15分钟的数据中,在第一个数据的下面。
我希望这是有道理的,非常感谢任何帮助
这不是一个代码写入服务,但只是创build一些简单的循环。
Sub tenmindata() Dim lastRow As Integer Application.ScreenUpdating = False Application.Calculation = xlCalculationManual lastRow = Range("A" & Rows.Count).End(xlUp).Row j = 3 For i = 3 To lastRow For k = 1 To 3 Cells(j, 7) = Cells(i, 3).Value / 3 j = j + 1 Next k Next i Application.ScreenUpdating = True Application.Calculation = xlCalculationAutomatic End Sub