如何使此匹配/索引工作表功能作为数组公式？

Question

matchRECORD1 = Application.WorksheetFunction.Index(Sheets("TEMPDB").Range("D" & lrCHIMPORT2 + 1 & ":D" & lr3CHIMPORT2), _
                                    Application.WorksheetFunction.Match(Sheets("STATIONS").Cells(RARSTAT3, 2) & Sheets("STATIONS").Cells(1, cARTIST), _
                                    Sheets("TEMPDB").Range("C" & lrCHIMPORT2 + 1 & ":C" & lr3CHIMPORT2) & Sheets("TEMPDB").Range("A" & lrCHIMPORT2 + 1 & ":A" & lr3CHIMPORT2)))

如何使它像一个数组公式？

Answer 1

您可以使用以下语句：

  matchRECORD1 = Evaluate("INDEX(TEMPDB!D" & lrCHIMPORT2 + 1 & ":D" & lr3CHIMPORT2 & _
  ", MATCH(STATIONS!B" & RARSTAT3 & "& STATIONS!" & cells(1, cARTIST).Address & _
  " , TEMPDB!C" & lrCHIMPORT2 + 1 & ":C" & lr3CHIMPORT2 & _
  " & TEMPDB!A" & lrCHIMPORT2 + 1 & ":A" & lr3CHIMPORT2 & "))")

这是一件繁琐的工作，但这是强制Excel将其评估为数组公式的唯一（可能）方法。 问题是VBA串联运算符&在数组或范围对象上不起作用。