嘿，这个问题我熟！其实不用费劲写复杂的for循环也能快速搞定，不过既然你提到了要循环逻辑，我给你准备两种方案，按需选就行：

直接用Excel自带的AVERAGEIF函数就完美适配你的需求，它专门用来按条件计算平均值，能自动排除0值。在你要显示结果的单元格里输入：

=AVERAGEIF(BX2:BX50, "<>0")

简单解释下：<>是“不等于”的意思，这个函数会遍历BX2到BX50的所有单元格，只计算不等于0的数值的平均值，还会自动忽略空白单元格（如果CSV导入后有未填满的空白的话），比写代码省事太多。

如果你确实需要用循环来处理（比如后续要扩展更多自定义逻辑），那可以写一段VBA代码来实现：

1. 打开你的Excel文件，按下Alt + F11打开VBA编辑器
2. 右键左侧工程窗口里的工作簿名称 → 选择「插入」→「模块」
3. 粘贴下面的代码：

Function AverageExcludeZero(rng As Range) As Double
    Dim cell As Range
    Dim total As Double
    Dim count As Integer
    
    total = 0
    count = 0
    
    ' 遍历指定区域的每一个单元格
    For Each cell In rng
        ' 只处理数值类型且不等于0的单元格
        If IsNumeric(cell.Value) And cell.Value <> 0 Then
            total = total + cell.Value
            count = count + 1
        End If
    Next cell
    
    ' 防止出现除以0的错误（比如区域里全是0或空白）
    If count > 0 Then
        AverageExcludeZero = total / count
    Else
        AverageExcludeZero = 0 ' 你也可以改成""或者其他默认值
    End If
End Function

4. 回到Excel界面，在目标单元格里输入自定义函数调用：

=AverageExcludeZero(BX2:BX50)

这段代码的逻辑很清晰：

• 自定义了一个名为AverageExcludeZero的函数，接收一个单元格区域作为参数
• 用For Each循环逐个遍历区域内的单元格
• 判断单元格是数值且不等于0时，累加总和和有效计数
• 最后用总和除以有效计数得到平均值，还加了防除以0的判断，避免出现报错

小提示：如果你的CSV导入后有文本类型的"0"，可以把代码里的cell.Value <> 0改成cell.Value <> "0"，不过一般CSV导入的0都是数值型的，默认代码应该就够用。

内容的提问来源于stack exchange，提问作者matyd