找出Excel列中的所有唯一名称

时间:2015-11-05 12:40:29

标签: arrays excel-vba vba excel

我有2个工作表,用于存储有关一周交易的信息。一个是本周,另一个是最后几周进行比较。 两家公司的布局都是一样的。 有些公司上周有交易,但本周没有交易。

公司名称显示在一列中,但可以多次出现。

当我使用Excel自动过滤器功能时,它只显示该列中的唯一条目,我想在VBA代码中复制它,以便我可以输出出现在任一工作表中的每个公司名称。

我正在寻找与Excel - All unique words in a range类似的内容 但是在那个解决方案中,单元格中的条目本身是分开的,我希望将单元格整体放入并进行比较。

删除JOIN代码并更改varValues = Split(strAllValues, " ")以使strAllValues成为工作表范围会不会很简单?

任何问题随时可以提出。

马特

1 个答案:

答案 0 :(得分:2)

保持JOIN,但不是使用空格("")而是使用管道" |"然后再次使用管道进行拆分功能,它将为您提供所有个人姓名的数组