vba：仅连接可见单元格的函数

Question

我有一个excel公式：

=IF(OR(ISNUMBER(SEARCH({"DA","NU"},'- - REZULTAT ANAF - -'!I4))),CONCATENATE('- - REZULTAT ANAF - -'!B4,""),"")

它下到第17000行。

它将表格中的单元格B4 - - REZULTAT ANAF - - 连接到另一张表格，如果表格中的I4 - - REZULTAT ANAF - - '=“DA”或“NU”。

我需要一个可以做同样事情的函数但是它还确定单元格是否可见（已过滤）并且仅在它可见（未过滤掉）时连接。（我设法做到了这一点有一个范围，但我需要逐个细胞地做）

我可以通过以下方式做同样的事情：在整个表格上自动过滤，然后只是将整个结果复制到另一张表格上，但却是一张包含17000个公式和宏的表格，这会减慢excel的速度。

Answer 1

我使用的是不同的工作表名称，但这对我有用：

=IF(AND(SUBTOTAL(103,Sheet2!I4),OR(ISNUMBER(SEARCH({"DA","NU"},Sheet2!I4)))),
    CONCATENATE(Sheet2!B4,""),
    "")