删除一行内的重复

如何在使用VBA的情况下删除一行中的重复项?

我拥有的:

行1: 1 | 1 | 2 | 2 | 3 | 3 1 | 1 | 2 | 2 | 3 | 3

我想要的是:

行1: 1 | 2 | 3 1 | 2 | 3

如果您不关心空格,并且在单元格A1:F1中有六个数字,则可以在单元格A2:F2中执行此操作:

 =IF(COUNTIF($A$1:A1, A1) > 1, "", A1) 

只要把它拖过去。 对于你的例子,这将导致1,2,3,。

首先,使用[DATA]选项卡中的[Text to columns]将单元格拆分为列
 2:转置数据
 3:[数据]选项卡中的[删除重复]
 4:转置数据
 5:连接细胞