2014-09-24 74 views
0

我创建了一个宏,它将从我的工作簿中的一张表中复制一些信息到另一个表以符合一些条件,以便我可以将信息导入到程序中。唯一的问题是宏运行后,有一些空白行和一些重复项。我有12列的信息,但我想让宏查看并比较D,E,F,GL列中的条目和上面的行。因此D2,E2,F2,G2L2将与D1,E1,F1,G1L1进行比较。如果这些单元格中的所有条目都与前一行的条目匹配,则删除整行。删除具有多个匹配单元格的整行

我发现了一些匹配一个单元格的代码,或者在某个列中查找重复的内容,但没有看到并匹配多个列,我对此很陌生,以至于即使入门也遇到了麻烦。

任何和所有的输入是受欢迎的。

+0

排序会将空行移动到一起; RemoveDuplicates方法将让您指定多个列进行比较 – 2014-09-24 20:16:01

回答

0

你将不得不把你的程序自己的逻辑,但使用这样的:

worksheets("Sheet1").range("A1").offset(i, 0).resize(1, colnum).delete Shift:=xlUp 

一个简单的方法来找到你所需要的命令是录制宏,看看Excel使用建立这个宏。