在一列中平均可变行数的公式/代码取决于Criteria

Question

我的数据看起来像这样。

142 2.506

144 2.677

146 2.258

148 0.398

150 0.108

152 3.257

154 0.855

148 2.515

150 2.671

152 2.3

154 0.412

156 3.253

158 0.855

148 2.488

150 2.676

152 2.279

154 0.376

156 0.125

158 3.277

160 0.858

146 2.496

148 2.693

150 2.264

152 0.402

154 0.122

156 3.256

158 0.877

142 2.495

144 2.661

146 2.274

148 0.382

150 0.133

152 3.258

154 0.838

147 2.491

我想计算已经离开列值142,144,146,148,150,152,154（增加）的右列行的平均值。

当值下降到148时，计算另一个平均值148,150,152,154,156,158等等。

如果可以，请帮助我。我将非常感激。

Answer 1

所以数字总是从142开始，并且增加2到154？所以你需要一个重复7次的循环。

dim rowCount, x as integer
dim average as double
rowCount = 2

Do until cells(rowcount,1).value = ""
for x = 1 to 7
average = average + cells(rowcount,2).value
rowcount = rowcount + 1
next x
cells(rowcount,3).value = average/7
rowcount = rowcount + 1
loop

如果它总是递增7，则使用for循环计数到7。