在A列中有 a d d a c b a 等若干行,怎么用公式使在B列中显示A列中不重复的名称.也就是用公式实现高级筛选中选择不重复项的功能
来源:学生作业帮助网 编辑:作业帮 时间:2024/07/04 19:42:54
![在A列中有 a d d a c b a 等若干行,怎么用公式使在B列中显示A列中不重复的名称.也就是用公式实现高级筛选中选择不重复项的功能](/uploads/image/z/12264464-56-4.jpg?t=%E5%9C%A8A%E5%88%97%E4%B8%AD%E6%9C%89+a+d+d+a+c+b+a+%E7%AD%89%E8%8B%A5%E5%B9%B2%E8%A1%8C%2C%E6%80%8E%E4%B9%88%E7%94%A8%E5%85%AC%E5%BC%8F%E4%BD%BF%E5%9C%A8B%E5%88%97%E4%B8%AD%E6%98%BE%E7%A4%BAA%E5%88%97%E4%B8%AD%E4%B8%8D%E9%87%8D%E5%A4%8D%E7%9A%84%E5%90%8D%E7%A7%B0.%E4%B9%9F%E5%B0%B1%E6%98%AF%E7%94%A8%E5%85%AC%E5%BC%8F%E5%AE%9E%E7%8E%B0%E9%AB%98%E7%BA%A7%E7%AD%9B%E9%80%89%E4%B8%AD%E9%80%89%E6%8B%A9%E4%B8%8D%E9%87%8D%E5%A4%8D%E9%A1%B9%E7%9A%84%E5%8A%9F%E8%83%BD)
在A列中有 a d d a c b a 等若干行,怎么用公式使在B列中显示A列中不重复的名称.也就是用公式实现高级筛选中选择不重复项的功能
在A列中有 a d d a c b a 等若干行,怎么用公式使在B列中显示A列中不重复的名称.
也就是用公式实现高级筛选中选择不重复项的功能
在A列中有 a d d a c b a 等若干行,怎么用公式使在B列中显示A列中不重复的名称.也就是用公式实现高级筛选中选择不重复项的功能
按Alt+F11组合键或鼠标右击工作表标签选“查看代码”,打开VBA编辑器,输入如下代码:
Sub 去掉重复数()
Dim xRow,i,j As Integer
xRow = Range("A65536").End(xlUp).Row
Range(Cells(1,2),Cells(2,2)).EntireColumn.ClearContents
j = 1
For i = 2 To xRow
If Cells(i,1) "" And WorksheetFunction.CountIf(Range(Cells(1,2),_
Cells(j,2)),Cells(i,1)) = 0 Then
Cells(j,2) = Cells(i,1)
j = j + 1
End If
Next
End Sub
运行代码前,将宏安全性设为中.运行代码有两种方法:运行宏“去掉重复数”;在VBA编辑状态按F5.
=IF(COUNTIF(INDIRECT("A1:" & "A" &ROW()),A1)=1,A1,"")怎么做出来中间是用空格的,可不可以排在一起? 还有INDIRECT("A1:" & "A" &ROW()),A1是什么意思 ?排在一起用的公式很复杂。 INDIRECT("A1:" & "A" &ROW()) 表示A1到目前行的引用,比如目前在第3行,那就是A1:A3 COUNTIF(...
全部展开
=IF(COUNTIF(INDIRECT("A1:" & "A" &ROW()),A1)=1,A1,"")
收起
我一般是这样做的
1、先把A列复制到D列,
2、将D列排序,
3、在E1单元格用文本函数里面的公式 EXACT(D1,D2) ,比较两个单元格内容是否完全一致,一致返回true,不一致则返回false
4、下拉复制也就是说 E列就只有不是false就是true的单元格了
5、将E列剪切,选择性沾贴 数值 到C列
6、选中C和D列,排序
7、...
全部展开
我一般是这样做的
1、先把A列复制到D列,
2、将D列排序,
3、在E1单元格用文本函数里面的公式 EXACT(D1,D2) ,比较两个单元格内容是否完全一致,一致返回true,不一致则返回false
4、下拉复制也就是说 E列就只有不是false就是true的单元格了
5、将E列剪切,选择性沾贴 数值 到C列
6、选中C和D列,排序
7、将C列中false的单元格连同相应D列删去
收起