excel里面有8千行，每行7个数字，我想把每一行里有相同数字的行删掉，怎么办？麻烦高手帮忙编程举例说明

发布网友发布时间：2022-10-05 04:39

共4个回答

热心网友时间：2023-10-17 03:58

前面A:G列共七列有数据
可以在H1单元格输入公式
=sumproct(1/countif(A1:G1,a1:G1))
双击填充柄,或下拉填充到8千行
然后筛选H列,筛选条件,大于1
选择筛选出来的行,选择删除来自：求助得到的回答

热心网友时间：2023-10-17 03:58

1)手工新创建一个工作表sheet1
2)用到EXCEL的宏，VBA编程。两个循环：
21）大循环 for I=1 to 8000//读取工作表sheet中每一行数据
22）小循环 for j=1 to 7，读去第一列到7列数字，比较是否有相同的。如有转到(24)
23) next j
24) 将本行中全部7个数据写入工作表sheet1
25）next i

热心网友时间：2023-10-17 03:59

1、在第八列输入公式：=IF(SUMPRODUCT(COUNTIF(A1:G1,A1:G1))>7,“删除","") ，下拉复制公式；
2.，以第八列排序，使欲删除的行排列在一起，删除标记为“删除”的行；
3、删除第八列。

热心网友时间：2023-10-17 03:59

=IF(SUM(1/COUNTIF(A2:g2,A2:g2))=7,"","删")
数组公式,shift+ctrl+回车结束公式,然后向下复制,最后筛选删除掉"删"字样的行就可以了.