一.介紹

我們的學術論文中進程會遇到對于數(shù)據(jù)的處理問題，其中就包括求解一類用上±這類問題倍啥，如100±0.38汇四，朋友問我我突然也蒙住了，隱約記得是有關方差？標準差羡棵？滿腦子都是高中老師課堂上的有一批次的電燈泡檢驗啦，零件檢驗啦的問題balabala...
于是打開搜索引擎開始查找戚绕，顯示輸入一堆很高大上的描述鉴逞，全都沒有中標：
不過有必要把wiki百科上的定義po出來，這里用google翻譯了一下：

二.如何用excel求一組數(shù)據(jù)的和/平均值/方差/標準差

已經(jīng)了解過了理論方面的知識氓癌，那么下面我們來了解一下如何用excel計算這兩個值不用反復輸入公式且以后可以直接使用。還有一個優(yōu)點就是再也不用害怕大的數(shù)據(jù)量了贫橙。

1.excel中準備要處理的數(shù)據(jù)

2.文件->選項->自定義功能區(qū)->開發(fā)工具->確定

3.開發(fā)工具->Visual Basic->右擊VBAProject->插入->模塊

4.雙擊打開模塊1贪婉，將下面的代碼復制進去

PS：偶然逛知乎看見一博主寫的VBA編程，他只寫了均值卢肃，我突發(fā)奇想改進加了其他幾個函數(shù)疲迂，其實總結起來就是把excel用來求這幾個值的函數(shù)添加到編程中。求和用的是Sum（）莫湘，均值用的是Average（）尤蒿，方差用的是Var（），標準差用的是Stdevp(),本文末我將介紹標準差一些函數(shù)用的區(qū)別幅垮，可以根據(jù)需要對代碼進行更改或自己添加优质。

Sub 選擇區(qū)域數(shù)量計算求和()
Dim Ra As Range
Set Ra = Application.InputBox("請選擇區(qū)域范圍", "范圍引用", Type:=8)
If Ra.Address = "" Then Exit Sub
a = Application.WorksheetFunction.Sum(Ra)
MsgBox (a)
End Sub
Sub 選擇區(qū)域數(shù)量計算均值()
Dim Ra As Range
Set Ra = Application.InputBox("請選擇區(qū)域范圍", "范圍引用", Type:=8)
If Ra.Address = "" Then Exit Sub
a = Application.WorksheetFunction.average(Ra)
MsgBox (a)
End Sub
Sub 選擇區(qū)域數(shù)量計算方差()
Dim Ra As Range
Set Ra = Application.InputBox("請選擇區(qū)域范圍", "范圍引用", Type:=8)
If Ra.Address = "" Then Exit Sub
a = Application.WorksheetFunction.Var(Ra)
MsgBox (a)
End Sub
Sub 選擇區(qū)域數(shù)量計算標準差()
Dim Ra As Range
Set Ra = Application.InputBox("請選擇區(qū)域范圍", "范圍引用", Type:=8)
If Ra.Address = "" Then Exit Sub
a = Application.WorksheetFunction.STDEVP(Ra)
MsgBox (a)
End Sub

5.回到Excel主界面，點擊開發(fā)工具->插入->按鈕

6.創(chuàng)建按鈕

a.空白處隨便框兩個格子军洼，選上功能巩螃，如求均值

b.確定后左擊按鈕改名字為均值

7.使用按鈕，選中需要計算的范圍即可計算出結果匕争，如計算均值

8.大功告成避乏，利用別的功能分別計算方差和標準差

方差

標準差

三.分析

該方法的優(yōu)勢在于之后所有的數(shù)據(jù)計算直接調(diào)用即可，不需要再手動輸入甘桑。如果你還想添加別的功能直接修改這兩個部分即可拍皮，第二個紅線位置根據(jù)需求可以百度查找非常容易。