去重可以采用以下公式,直接给你写好了。当第一行为标题行时,从第二行内容开始去重,根据所要去重内容所在列,选择以下公式。如:去重内容在A列,则可以在B列依次输入公式:
=if(countif(A$2:A2,A2)>1,"重复","")
=if(countif(C$2:C2,C2)>1,"重复","")
=if(countif(E$2:E2,E2)>1,"重复","")
=if(countif(F$2:F2,F2)>1,"重复","")
=if(countif(D$2:D2,D2)>1,"重复","")
=if(countif(G$2:G2,G2)>1,"重复","")
=if(countif(B$2:B2,B2)>1,"重复","")
=IF(COUNTIF(H$2:H2,H2)>1,"重复","")
数据——>筛选——>高级筛选—>选择不重复记录
假设数据在A列,选中A列
条件格式采用公式设置,公式为
=OR(A1=1,a1=2,a1=3)
设置格式为红色
再建一个条件格式,步骤及方法同上
可以用VBA(宏)的方法实现: 为了灵活应用与避免一些不必要的错误,运行下面的宏时,先选择所有人名的单元格(关键的一步),再运行此宏: Sub HideOne() Dim TRan As Range For Each TRan In Selection TRan.EntireRow.Hidden = TrueEnd IfNextEnd Sub如果还不明白,请在百度Excel吧发贴:
采用高级筛选 勾选 选择不重复的记录
选择 将筛选结果复制到其他位置 复制到 选择 一个空白单元格
或
在B1中输入或复制粘贴下列公式
=COUNTIF(A:A,A1)=1
或
=COUNTIF(A$1:A1,A1)=1
下拉填充
筛选B列 B列结果为TRUE的A列即是你要的结果
假设A列为原数据,在B列设公式.
在B1输入:
=IF(COUNTIF($A$1:A1,A1)>1,"",A1)
下拉B1,
将B列,复制,
选A列,菜单:编辑>选择性粘贴...选:"数值"
OK
在需要删除的笔刷上点击鼠标右键选择删除就好了。
arams = url.split("?");
newUrl="";
pa = params[1].split("&");
var repeatParam = new Array();
var allParam = new Array();
f=0;
re:
for(var a=0;a<pa.length;a++){
for(var b=0;b<pa.length;b++){
if(allParam[b]==pa[a]){
continue re;
}
}
if(f<pa.length){
allParam[f]=pa[a];
newUrl+=pa[a]+"&";
f++;
}