Excel - 从每个单元格中有多个值的列中提取唯一值
尼姆罗德柳井
我有一个列中的出版商列表。我需要将唯一的发布者提取到一个单独的列表中，如下所示：
PLoS
Nature
IMA
NAoS
Elsevier
PLoS
T&F, Ebsco
ONCOTARGET
Oxford, ProQuest
Nature
Elsevier, ProQuest
ACS
Springer
Ebsco/ProQuest
PLoS
Elsevier
Nature
需要变成：
PLoS
Nature
IMA
NAoS
Elsevier
T&F
Ebsco
ONCOTARGET
Oxford
ProQuest
ACS
Spring
如您所见，在有多个发布者的行中，我需要对它们进行唯一计数。
这可能吗？
加里的学生
这个简短的宏既解析数据又删除重复项：
Sub dural()
Dim K As Long, i As Long, N As Long
Dim ary, a
K = 1
N = Cells(Rows.Count, "A").End(xlUp).Row
ary = Range("A1:A" & N)
For Each a In ary
a = Replace(a, ", ", "/")
If InStr(1, a, "/") > 0 Then
bry = Split(a, "/")
For Each b In bry
Cells(K, 2) = b
K = K + 1
Next b
Else
Cells(K, 2).Value = a
K = K + 1
End If
Next a
Range("B:B").RemoveDuplicates Columns:=1, Header:=xlNo
End Sub
本文收集自互联网，转载请注明来源。
如有侵权，请联系[email protected] 删除。
编辑于
相关文章
Related 相关文章
- 1
如何根据Excel中的多个条件从列中提取所有唯一值
- 2
Excel公式从单元格中提取键和值
- 3
在excel或R中为给定范围的每个单元格中创建唯一值
- 4
Excel 2007-具有唯一值的强制性单单元格输入
- 5
Excel：基于相邻单元格唯一性的单元格值差异
- 6
从Excel中包含逗号分隔值的两个单元格中提取公共值
- 7
Excel获取最小值，并且如果一行中有两个单元格匹配，则返回连续3列中的值
- 8
从Excel单元格中提取多个文本
- 9
从Excel中的单元格中提取多个数据
- 10
Excel：检查多个单元格是否有指定值，命名不匹配的单元格
- 11
从Excel单元格中提取一个短语
- 12
从Microsoft Excel（2007）中的单元格中提取粗体值
- 13
如何使用EXCEL公式从一列单元格中提取具有特定模式的文本？
- 14
Excel 从值列表中向相邻单元格返回 4 个随机唯一值
- 15
从Excel单元格中提取textpattern
- 16
在EXCEL中为每个第一列单元格找到第二列集的最后一个单元格值
- 17
在同一单元格中找到最大值的excel公式具有最右边数字的多个值
- 18
Excel XY（散点图）图表每个单元格使用多个值
- 19
Excel VBA-遍历单元格列并在工作簿中搜索每个单元格值
- 20
连接Excel中的唯一值而不计算空白单元格
- 21
连接Excel中的唯一值而不计算空白单元格
- 22
Excel VBA：格式控件下拉列表填充单元格中的唯一值
- 23
Excel VBA - 查找非隐藏单元格的唯一值
- 24
在 Excel VBA 中按颜色计算唯一单元格值
- 25
Excel –基于间隔中的另一个单元格值在列中设置单元格值
- 26
获取每个单元格具有多个值R的列的唯一值
- 27
从excel单元格/ excel文件中提取多个电子邮件地址
- 28
EXCEL：如何对与另一个“合并”单元格相对应的多个单元格/值求和？
- 29
如何在excel vba中删除具有特定值的每个单元格？
我来说两句