计算多列的中位数

Calculate median of multiple columns

在我名为 "Sheet1" 的工作表中,从 A 列到 J 列,每一列都包含不同的值(因此它们都有不同的行数)。

如何计算这些列的中位数并将计算出的中位数放在第 9 行和第 M 到 V 列中?
我知道如何将计算出的中位数存储到所需位置,但真的不确定如何计算中位数。

我知道这可以通过使用 excel 中值函数来解决,但这不是我想要做的。我有超过 10 个工作表,所以 VBA 将是最有效的。

您只需设置 M9 =MEDIAN(A2:A8) 并将 A2:A8 设置为您想要的范围。

然后将其复制并粘贴到其他列 M9:V9。 Excel 将自动将列更改为 B、C、D 等,并填写您想要的信息。

为 VBA 编辑

这里有一个快速而复杂的 VBA 宏来应用它们:

Sub StacvQ()

    For SheetIndex = 1 To Sheets.Count
        Sheets(SheetIndex).Select
        Cells(9, 13).FormulaR1C1 = "=Median(R2C[-12]" & ":" & "R8C[-12])"
        Cells(9, 13).Copy
        Range(Cells(9, 13), Cells(9, 22)).Select
        ActiveSheet.Paste

    Next SheetIndex

End Sub