EXCEL 统计问题，关于权重统计

假定你图1的数据存放区域如下图：

ALT+F11，打开VBA编辑器，插入模块，复制粘贴以下代码，F5运行，结果显示在A11—A16中。

Sub tj()

Dim i, j, x, y as byte

Dim a, b, c, d, e, f As single

Range("k:p")Clear

For i = 2 To 8

x = 0

y = 0

For j = 3 To 10

If Int(j / 2) <> j / 2 And Cells(i, j) <> "" Then

x = x + 1

Else

If Int(j / 2) = j / 2 And Cells(i, j) <> "" Then

y = y + 1

End If

End If

Next

If x = 0 And y = 0 Then

Cells(i, Asc(Cells(i, 2)) - 54) = 1

End If

If x = 1 And y = 0 Then

Cells(i, Asc(Cells(i, 2)) - 54) = 05

For j = 3 To 10

If Int(j / 2) <> j / 2 And Cells(i, j) <> "" Then

Cells(i, Asc(Cells(i, j)) - 54) = Cells(i, Asc(Cells(i, j)) - 54) + 05

End If

Next

End If

If x > 1 And y = 0 Then

Cells(i, Asc(Cells(i, 2)) - 54) = 03

For j = 3 To 10

If Int(j / 2) <> j / 2 And Cells(i, j) <> "" Then

Cells(i, Asc(Cells(i, j)) - 54) = Cells(i, Asc(Cells(i, j)) - 54) + 07 / x

End If

Next

End If

If x = 0 And y >= 1 Then

Cells(i, Asc(Cells(i, 2)) - 54) = 06

For j = 3 To 10

If Int(j / 2) = j / 2 And Cells(i, j) <> "" Then

Cells(i, Asc(Cells(i, j)) - 54) = Cells(i, Asc(Cells(i, j)) - 54) + 04 / y

End If

Next

End If

If x = 1 And y >= 1 Then

Cells(i, Asc(Cells(i, 2)) - 54) = 03

For j = 3 To 10

If Int(j / 2) <> j / 2 And Cells(i, j) <> "" Then

Cells(i, Asc(Cells(i, j)) - 54) = Cells(i, Asc(Cells(i, j)) - 54) + 06

Else

If Int(j / 2) = j / 2 And Cells(i, j) <> "" Then

Cells(i, Asc(Cells(i, j)) - 54) = Cells(i, Asc(Cells(i, j)) - 54) + 01 / y

End If

End If

Next

End If

If x > 1 And y > 1 Then

Cells(i, Asc(Cells(i, 2)) - 54) = 02

For j = 3 To 10

If Int(j / 2) <> j / 2 And Cells(i, j) <> "" Then

Cells(i, Asc(Cells(i, j)) - 54) = Cells(i, Asc(Cells(i, j)) - 54) + 07 / x

Else

If Int(j / 2) = j / 2 And Cells(i, j) <> "" Then

Cells(i, Asc(Cells(i, j)) - 54) = Cells(i, Asc(Cells(i, j)) - 54) + 01 / y

End If

End If

Next

End If

Next

a = ApplicationWorksheetFunctionSum(Range("k:k"))

b = ApplicationWorksheetFunctionSum(Range("l:l"))

c = ApplicationWorksheetFunctionSum(Range("m:m"))

d = ApplicationWorksheetFunctionSum(Range("n:n"))

e = ApplicationWorksheetFunctionSum(Range("o:o"))

f = ApplicationWorksheetFunctionSum(Range("p:p"))

Range("k:p")Clear

Cells(11, 1) = "A=" & Format(a, "000")

Cells(12, 1) = "B=" & Format(b, "000")

Cells(13, 1) = "C=" & Format(c, "000")

Cells(14, 1) = "D=" & Format(d, "000")

Cells(15, 1) = "E=" & Format(e, "000")

Cells(16, 1) = "F=" & Format(f, "000")

End Sub

1、各个数字的个数分别表示为：k1,k2,k3……kn；

加权平均的公式是：(k1p1+k2p2+……knpn)/(k1+k2+kn)。

2、给出一组数据，其中3出现6次，4出现3次，2出现1次。6、3、1就叫权数。这种方法叫加权法。一般说的平均数，就是把所有的数加起来，再除以这些数的总个数。

表示为：(p1+p2+p3+…+pn)/n。但有的数据记录中有一些相同的数据，在计算的时候，那一个数有几个相同数，就把这个数乘上几，这个几，就叫权，加权，就是乘上几后再加。平均数还是要除以总个数。

扩展资料

在每一个数的权数相同的情况下，加权平均值就等于算数平均值。

此外在一些体育比赛项目中，也要用到权重的思想比如在跳水比赛中，每个运动员除完成规定动作外，还要完成一定数量的自选动作。

而自选动作的难度是不同的，两位选手由于所选动作的难度系数不同，尽管完成各自动作的质量相同，但得分也是不相同的，难度系数大的运动员得分应该高些，难度系数实际上起着权重的作用。

在评估某个同学一学期的学生成绩时，一般不只看他期末的一次成绩，而是将平时测验、期中考试等成绩综合起来考虑，比如说，一同学两次单元测验的成绩分别为88，90，期中的考试成绩为92，而期末的考试成绩为85。

如果简单地计算这四个成绩的平均数，即将平时测验与期中、期末考试成绩同等看待，就忽视了期末考试的重要性鉴于这种考虑，我们往往将这四个成绩分配以不同的权重。

参考资料来源：百度百科-加权

我觉得你可以这样：
1把筛选出来的数据在最后一列（如D列）全部输入一个字母，如OK
2然后撤销筛选，数据全部做加权平均
3在D列筛选自定义“空白”，倒出来后全部删掉，这样剩下的就是你要的数据了
你试试看。。。

权是权重，通俗理解就是系数。
“加权”就是考虑到不同变量在总体中的比例份额，乘以权重的意思。
加权平均数是不同比重数据的平均数，加权平均数就是把原始数据按照合理的比例来计算，
简单的例子就是：
你的小测成绩是80分，期末考成绩是90分，老师要计算总的平均成绩，就按照小测40％、期末成绩60％的比例来算，所以你的平均成绩是：
80×40％+90×60％＝86
学校食堂吃饭，吃三碗的有
x
人，吃两碗的有
y
人，吃一碗的
z
人。平均每人吃多少？
(3x
+
2y
+
1z)/(x
+
y
+
z)
这里3、2、1分别就是权数值

WITHtAS(SELECTareaIdFROM表GROUPBYareaIdHAVINGCOUNT(areaId)>1)SELECTFROM表WHEREReserverState='run'ANDareaIdIN（SELECTareaIdFROMt）UNIONALLSELECTFROMtWHEREareaIdNOTIN(SELECTareaIdFROMt)

以下是关于加权的一些说明，希望会对你有帮助，呵呵。
1、注释：
要理解加权是什么意思，首先需要理解什么叫“权”，“权”的古代含义为秤砣，就是秤上可以滑动以观察质量的那个铁疙瘩。《孟子·梁惠王上》曰:“权，然后知轻重。”就是这意思。
例子：学校算期末成绩，期中考试占30%，期末考试占50%，作业占20%，假如某人期中开始得了84，期末92，作业分91，如果是算数平均，那么就是(84+92+91)/3=89；
加权后的，那么加权处理后就是8430%+9250%+9120%=894，这是在已知权重的情况下；
那么未知权重的情况下呢？想知道两个班的化学加权平均值，一班50人，平均80，二班60人，平均82，算数平均是(80+82)/2=81，加权后是(5080+6082)/(50+60)=8109还有一种情况类似第一种也是人为规定，比如说你觉得专家的分量比较大，老师其次，学生最低，就某观点，满分10分的情况下，专家打8分，老师打6分，学生打7分，但你认为专家权重和老师及学生权重应为05:03:02，那么加权后就是805+603+702=72，而算数平均的话就是(8+6+7)/3=7。
2、权数与加权法：
统计学认为，在统计中计算平均数等指标时，对各个变量值具有权衡轻重作用的数值就称为权数．
例子：求下列数串的平均数
3、4、3、3、3、2、4、4、3、3、
一般求法为（3＋4＋3＋3＋3＋2＋4＋4＋3＋3）／10＝3．2
加权求法为（6＊3＋3＊4＋2）／10＝3．2
其中3出现6次，4出现3次，2出现1次．6、3、1就叫权数。这种方法叫加权法。
一般说的平均数，就是把所有的数加起来，再除以这些数的总个数。表示为：
(p1+p2+p3+…+pn)/n;
但有的数据记录中有一些相同的数据，在计算的时候，那一个数有几个相同数，就把这个数乘上几，这个几，就叫权，加权，就是乘上几后再加。平均数还是要除以总个数。
还是以上面的各个数为例：
它们每个数都有一些相同数，表示为：k1,k2,k3……kn;
加权平均的公式是：（k1p1+k2p2+k3p3+……knpn）/(k1+k2+k3+…kn)

---