Vba：如何计算范围的标准差

您可以使用以下基本语法来使用 VBA 计算某个范围内的值的标准差：

 SubStDevRange ()
    Range(" D2 ") = WorksheetFunction.StDev(Range(" B2:B11 "))
End Sub

此特定示例计算B2:B11范围内的值的标准差，并将结果分配给单元格D2 。

如果您想在消息框中显示值的标准差，则可以使用以下语法：

 SubStDevRange ()
    'Create variable to store standard deviation of values
    Dim stdev As Single
    
    'Calculate standard deviation of values in range
    stdev = WorksheetFunction.StDev(Range(" B2:B11 "))
    
    'Display the result
    MsgBox " Standard Deviation of Values in Range: " & stdev 
End Sub

以下示例展示了如何在 Excel 中的以下数据集（包含有关各种篮球运动员的信息）中实际使用这些方法：

示例 1：使用 VBA 计算范围的标准差并在单元格中显示结果

假设我们要计算点列中值的标准差并将结果显示在特定单元格中。

我们可以创建以下宏来执行此操作：

 SubStDevRange ()
    Range(" D2 ") = WorksheetFunction.StDev(Range(" B2:B11 "))
End Sub

当我们运行这个宏时，我们会收到以下输出：

请注意，单元格D2包含值11.93734 。

这告诉我们，点列中的值的标准差是 245。

示例 2：使用 VBA 计算范围的标准差并将结果显示在消息框中

假设我们想要计算点列中值的标准差并将结果显示在消息框中。

我们可以创建以下宏来执行此操作：

 SubStDevRange ()
    'Create variable to store standard deviation of values
    Dim stdev As Single
    
    'Calculate standard deviation of values in range
    stdev = WorksheetFunction.StDev(Range(" B2:B11 "))
    
    'Display the result
    MsgBox " Standard Deviation of Values in Range: " & stdev 
End Sub

当我们运行这个宏时，我们会收到以下输出：

消息框告诉我们B2:B11范围内的值的标准差是11.937 。

请注意，在本示例中，我们计算了B2:B11范围内的值的标准差。

但是，如果您想计算整列中值的标准差，则可以输入B:B 。

这将计算 B 列中每个单元格的值的总和。

注意：您可以在此处找到StDev VBA 方法的完整文档。

其他资源

以下教程说明如何在 VBA 中执行其他常见任务：

VBA：如何计算范围的平均值
VBA：如何计算范围内的行数
VBA：如何编写 SUMIF 和 SUMIFS 函数