代码之家  ›  专栏  ›  技术社区  ›  Pspl

多维数组的特定元素范围求和

  •  0
  • Pspl  · 技术社区  · 6 年前

    如何在不使用 For... Next 陈述?

    我知道如何使用一维数组。例如,下一个代码:

    Dim GRMORT(1 to 864) As Double
    Dim PSUM as Double
    PSUM = Application.Sum(Application.Index(GRMORT, 1, Evaluate("ROW(100:200")")))
    

    Dim GRMORT(1 to 864, 1 to 24) As Double
    

    这个功能不起作用。我想应该是第二个论点 Index 函数,所以我尝试将其更改为 2 , 3

    我怎样才能换 函数获取第四列(或任何其他列)的第100到200个元素的总和?

    1 回复  |  直到 6 年前
        1
  •  3
  •   Rory    6 年前

    只需提供列参数:

    Dim GRMORT(1 To 864, 1 To 5) As Double
    Dim PSUM As Double
    PSUM = Application.Sum(Application.Index(GRMORT, Evaluate("ROW(100:200)"), 4))