合并重复的列数据,而不会丢失Excel中其余行的值

时间:2017-02-01 13:58:39

标签: excel vba excel-vba merge duplicates

我正在尝试找到一种方法来合并数据的第一列中的重复值,而不会丢失其余行中的唯一值。

e.g。目前我的数据看起来像这样:

column a with a,a,a,b,b,b,c,c,c and column b with 1,2,3,4,1,2,3,4,1,2,3,4

我希望它看起来像这样:

column a with a, b, c and column b with 1,2,3,4,1,2,3,4,1,2,3,4

1 个答案:

答案 0 :(得分:0)

实际上,您只需关注第一列。第二个与它无关。 这里有一些伪代码,如果你把它翻译成VBA,那就可以了:

FOR EACH CELL IN COLUMN NUMBER
    IF CELL = OFFSET(PREVIOUS CELL) AND CELL.COLUMN > 1 THEN
        CELL.TEXT = ""
    END IF
NEXT CELL

FOR EACH CELL IN COLUMN NUMBER
    IF CELL = "" THEN 
        ENLARGE THE RANGE
    ELSE
        MERGE THE RANGE
    END IF
NEXT CELL

IF RANGE <> NOTHING THEN
     MERGE THE RANGE
END IF