EXCEL表格的处理,比较有难度..高手快来!!!!

有张表,共有18000多行.在E列是零件号,I列是价格.E列有很多重复不相同的零件号,但对应的I列价格却不重复..需要的结果就是, .E列的每个重复零件号只保留一条,而这一条所对应的价格必须是最低的那条..如果没看懂我的提问,可以和我QQ联系,61634807.
不是吧,手动剪切.?数据一共有18000多条,重复不相同的数据至少都是几千条-.-

E列排序,再用I列排序,筛选一下,把最低价的剪切、复制到另一个工作表,这样虽然笨一点,但却最简单,其实做起来也不复杂不麻烦的。
****还有一个函数公式****
先按在I列后插入一个空白列"J",再把“I”从高到低排序,再在J2单元格输入如下公式:
=COUNTIF(E$2:E2,E2),然后下拉填充。结束后再按J列从低至高排序,将J列里显示"1"的行留下,其余删除。
温馨提示:答案为网友推荐,仅供参考
第1个回答  2008-05-07
18000行是不是18000列的笔误?
如果必须保持原顺序不变,用数据--筛选--自动筛选,选定最低价格的一行后,删除其他行的相同零件号(用查找替换即可),是很简单的。
如果零件号相同的必须放在一起,就使用数据--排序--扩展选定区域,选择主要关键字:零件号,次要关键字:价格即可。
第2个回答  2008-05-07
很简单 用IF函数实现
步骤:
1:首先 按零件号升序排列
2:在辅助列中 :K2=E2 , K3=IF(E3=E2,0,1),向下填充,然后自动筛选除0的 删除就行了
第3个回答  2008-05-07
将数据复制到新表中(确保数据安全),以E列为主要关键字,I列为次要关键字排序;单击“工具-宏-visual basic编辑器”单击:“插入-模块”,在出现的编辑窗口中输入以下程序:

Sub del()

Dim lastrow As Long
Dim i As Long

lastrow = InputBox("输入最后一行的行号:")

Application.ScreenUpdating = False

For i = lastrow To 2 Step -1

If ActiveSheet.Cells(i, 1).Value = ActiveSheet.Cells((i - 1), 1).Value Then Rows(i).delete

Next i

End Sub

存盘,关闭vba,在sheet2中执行宏del即可。
第4个回答  2008-05-07
楼上有很多简单或复杂的办法都可以用了

如果没看明白,可以发给我来做
第5个回答  2019-08-25
你可以用排序法,先按照零件号排列,再按照价格排列,因为排序
菜单-排序,里面有主要关键字,次要关键字等等,你只要选择好范围,然后按照要求做就行了