excel - 使用VBA将Excel中的两列组合成 "virtual helper column"

Question

我有两列，通过连接它们将它们组合成第三个辅助列。

一个是 4 位数字列，另一个是个位数。

例如:

COLUMNA    COLUMNB  COLUMNC
1234       1        12341
1234       1        12341
1234       2        12342
2345       1        23451
2345       2        23452
2345       2        23452

然后，我在第 4 列中运行一个数组公式(使用每行中的标识符)，该公式指示每个标识符的 C 列有多少个唯一值。

如果可能的话，我想避免使用辅助列——在 VBA 中构建一个范围(以数字格式)，我可以在代码中引用它，这样我就可以取消辅助列。

希望这对某人有意义，并且他们知道如何做到这一点。

提前致谢。

编辑:抱歉——根据下面 Santosh 提供的非常有用的答案(我绝对可以用它来解决我遇到的另一个问题)，我意识到我还没有完全解释自己。

每一行都有一个标识符(此处显示为 COLUMN_IDENT)

COLUMNA    COLUMNB  COLUMNC    COLUMN_IDENT
    1234   1        12341      555
    1234   1        12341      555
    1234   2        12342      555
    2345   1        23451      666
    2345   2        23452      666
    2345   2        23452      666

然后，我使用数组公式(基于 FREQUENCY 函数)制作一个表格，显示每个唯一标识符(在本例中为 555 和 666)，连接的 COLUMN C 中出现了多少个唯一值。这里 555 为 2，666 为 2)。

我最终得到了这样的报告:

IDENT   UNIQUE_COUNT
555     2
666     2

我试图用代码做的是消除原始表中对辅助 COLUMNC 的需要，并且仍然允许我在第二个表中实现相同的结果。

再次提前致谢。

Answer 1

尝试下面的代码。

Sub sample()

    Dim lastRow As Long

    With Sheets("Sheet1")
        lastRow = .Range("A" & .Rows.Count).End(xlUp).Row
        .Range("A1:B" & lastRow).RemoveDuplicates Columns:=Array(1, 2), Header:=xlYes
    End With
End Sub