2017-09-20 73 views
0

从不同列的行我在Excel中的某些列,我需要他们的行如下面的例子合并在一起:合并在Excel

当前文件:

column A | column B | column C | column D | column E | column F 
001001  Adam   20  001002  Adam  1.2 
001001  Brian   21  001002  Brian  1.5 
001001  Cameron  25  001002  Cameron 1.1 
001001  Daniel  18  001002  Daniel  1.8 
001001  Edward  19  001002  Edward  2.3 

目的:

column A | column B | column C 
001001  Adam   20 
001002  Adam   1.2 
001001  Brian   21 
001002  Brian   1.5 
001001  Cameron  25 
001002  Cameron  1.1 
001001  Daniel  18 
001002  Daniel  1.8 
001001  Edward  19 
001002  Edward  2.3 

这可能吗?我开始学习VBA,所以我被这个问题困住了。

在此先感谢!

+2

启动记录,在第一组下复制第二组,然后在列B上排序。 –

回答

0

副本d:F向下跌破A:C,然后对它们进行排序似乎是最简单的解决方案:

Sub Demo 
    Range("D2:F" & range("F2").end(xldown).row).copy Range("A1").End(xldown).Offset(1,0) 

Range("A1").CurrentRegion.Sort Key1:=range("b1"),Key2:=range("a1") 
    End Sub 

这假定两个d和F没有空白单元格,直到底部

+0

其实,我现在感觉真的很愚蠢。我只是通过在Excel上使用排序选项来解决它。但我已经试过了你的答案,它也起作用了。谢谢! –