发布网友 发布时间:2022-08-29 06:17
共1个回答
热心网友 时间:2024-04-07 09:06
一组数据,不定有多少个,其中有几个空白,要在空白的地方填上现有数据的平均值,可以这样理解吗?
两个方案
1、在第101行输入公式=AVERAGE(A1:A100),具体地址自己改,右键复制,选整列,按Ctrl+G,定位条件,空值,确定,右键,选择性粘贴,值,删除101行的公式,这样所有空格都用现有数据的平均值填充
2、运行下面的代码,所有上下行有数据的空格填上下行平均数,首尾和连续空格忽略
Sub s()
For i = 2 To 100
If Cells(i, 1) = "" And Cells(i - 1, 1) <> "" And Cells(i + 1, 1) <> "" Then
Cells(i, 1) = (Cells(i - 1, 1) + Cells(i + 1, 1)) / 2
End If
Next
End Sub