如何提取 EXCEL 工作表中的重复数字

插入一个模块（用于自定义函数）。

option compare text

function renum(byval rng as range)dim str$, db$

str = rng

for i = 1 to len(str) -1if mid(str, i, 1) = mid(str, i + 1, 1) then

for j = i + 1 to len(str) -1if mid(str, j, 1) i = jexit for

end if

nextdb = db & mid(str, i, 1)end if

nextrenum = db

end function

您可以自定义函数，将以下内容复制到 VBA 模块，并在 Excel 中引用函数 ABA。

function aba(my_range as range)aba = ""

dim i, j as single

for i = 1 to len(my_range)for j = i + 1 to len(my_range)if mid(my_range, i, 1) = mid(my_range, j, 1) then

aba = aba & mid(my_range, i, 1)end if

nextnext

if aba = "" then aba = "没有重复值"

end function

可以自定义功能吗？

**如下，您可以找到多个重复的数字，例如11233445，具体用法请参阅附件中的动态图表（注：使用时需要将Excel宏安全性更改为中或低，具体修改方法“Excel宏安全性设置”即可）。

public function tqcf(rng as range)set d = createobject("")for i = 1 to len(rng)d(mid(rng, i, 1)) = d(mid(rng, i, 1)) 1

next i

for each ii in d

if >1 then

t = t & ii & ","

end if

next ii

if t <>"" then

tqcf = mid(t, 1, len(t) -1)elsetqcf = ""

end if

end function

如果最多只重复一个数字，则 B2 公式：

if(sum(n(len(a2)-len(substitute(a2,row($1:$10)-1,))1)),sum((len(a2)-len(substitute(a2,row($1:$10)-1,))1)*(row($1:

该公式以三个键 Ctrl+Shift+Enter 结尾。

向下复制公式。

Excel**经常会遇到一些重复值的问题，今天阿钟先生就和大家分享一些关于重复值的提取和标注的方法。 下表中的 name 列用作标记或提取唯一产品的示例。

01.标记重复值。

单击[开始] - [条件格式] - [突出显示单元格规则] - [重复值]。

重复的内容标注颜色将突出显示。

02.删除重复项。

使用重复数据消除功能删除重复内容并保留唯一值。

选择数据列，单击“数据 - 删除重复项”，在弹出的对话框中单击“确定”，如下图所示

03.高级过滤功能。

您还可以使用高级过滤功能提取唯一值。

选择数据列，点击[数据]-[高级]，在弹出的对话框中选择[将筛选结果复制到其他位置]-[复制到]，选择存储数据的单元格-选中[选择重复记录]-[确定]。 如下图所示：

04.数据透视表。

您还可以使用数据透视表来提取唯一值。

选择数据区域中的任意单元格，单击[插入]-[数据透视表]，在弹出的对话框[立即工作表]中选择数据透视表的位置，选择存储数据的单元格，然后单击[确定]。

在右侧弹出的数据透视表字段窗格中，将“名称”字段拖拽到“行”中，然后将数据透视结果粘贴为广西格式以删除无用项。

05.公式函数方法。

在单元格 C2 中输入公式：

iferror(lookup(1,0/(countif(c$2:c2,$a$2:$a$17)=0),$a$2:$a$17),"然后按照填充公式提取唯一值。

朋友们，大家在使用excel中遇到过什么问题，在评论区留言一起讨论学习，坚持原创不容易，大家的喜欢**是最大的支持，更多教程点击下面的栏目学习。

excel提取重复数据的方法有哪些？ 在Excel**中，如何提取在同一列数据中重复的数据？ 若要了解 Excel 如何提取重复数据，请查看以下内容：

Excel 设置在同一列中提取重复数据的方法

1. 打开Excel**，制作数据表。

2. 首先，选择分组列。

3. 然后单击“数据 - 高级命令”。

4.在高级过滤器框中，选择非重复记录并将其勾选为OK。

5.最后，结果出现了，发现只剩下三组了。

提取 Excel 2013 列重复项的方法**

完成公式 =if（countif（$c$2：$c$10，$b$2：$b$10）>0，$b$2：

b$10,"Excel 提取重复数据的方法"公式的含义将在后面解释。

在这种情况下，您需要按 Ctrl+Shift+Enter 键三个键，否则将不会显示正确的结果。

因为这里我们选择单元格范围，然后输入公式，然后就不需要填充单元格了。

这可以通过条件格式化命令来实现。

1.在计算机上使用2007版Excel软件打开目标文件，然后选择目标列。

2.然后单击上方快捷方式栏中的“格式”选项。

3.然后在格式菜单中，执行“条件格式 - 突出显示单元格规则 - 重复值”选项。

4.然后设置要确定的重复值的高亮颜色。

5.然后复制并粘贴红色突出显示的**以提取重复数据。

您可以使用以下步骤提取单元格中的重复数字，并按重复次数重新排列它们：

在单元格中输入以下公式：=CountIF（a：a，a1），其中 a：a 是指数字所在的列，a1 是要计数的第一个单元格。

按Enter键，将显示该数字在单元格中的出现次数。

按 Ctrl + C 复制单元格的值。

选择要粘贴的单元格，然后按 Ctrl + V 将值粘贴到所选单元格中。

重复步骤 1 到 4 以计算每个数字的出现次数。

选择包含要排序的出现次数和次数的列，然后单击“数据”选项卡，然后在“排序>筛选器”组中，单击“排序”。

在出现的对话框中，选择要排序的列，然后选择“从大到小排序”。

单击“确定”完成排序。

希望这些信息对您有所帮助！

您可以使用以下公式实现上述功能：

首先，请在单元格 A1 中填写数据。

在单元格 b1 中输入以下公式：

textjoin(""true,sort(filterxml(""substitute(a1,""

"s[not(preceding::s[.=current()]1,true))

该公式将从单元格 A1 中提取所有不同的数字并按数字大小对它们进行排序。 排序后，所有数字将连接在一起，结果将显示在单元格 b1 中。

备注：如果要按重复次数从大到小排序，可以将第三个参数设置为false，即：

textjoin(""true,sort(filterxml(""substitute(a1,""

"s[not(preceding::s[.=current()]1,false))

如果要按重复次数从小到大排序，可以将第三个参数设置为 true，即：

textjoin(""true,sort(filterxml(""substitute(a1,""

"s[not(preceding::s[.=current()]1,true))

希望这些信息对您有所帮助。

学会用**来解决它。

Excel 按顺序对重复值进行排序。

方法步骤：

打开 Excel**，设置数据右侧的重复次数列，然后调用 countif 函数。

设置参数以计算数据列范围内的重复次数。

通过下拉，计算所有数据单独重复的次数。

1.打开Excel**并选择查找重复项所需的单元格。

2.单击“开始”工具栏中的“条件格式”，然后选择“突出显示单元格规则”。

3. 在弹出菜单中选择“复制值”选项。

4. 在弹出的“复制值”对话框中，选择“浅红色填充颜色：深红色文本”，然后单击“确定”。

5.您可以看到所选单元格的重复值标记为红色。

有两种方法可以做到这一点。

以WPS 2019为例。

第一种方法：点击“数据”-突出显示重复项“，选择要查找的数据，所有重复的数据都会被突出显示。

第二种方法：“开始”--条件格式“--突出显示单元格规则”--重复值“，在打开数据之前对重复的单元格进行颜色 --筛选，按颜色筛选。 没有颜色是唯一的值，颜色是重复的值。

使用“开始-条件格式-重复值”功能可快速定位重复值单元格。

Excel 版本参考：2010

1. 在 A 列中选择数据区域。

2.点击 开始 - 条件格式 - 重复值，然后单击 OK;

3.标记的颜色是重复值。

事实证明，数据在 A 列中，A1 开始。

b1 input = if（countif（a：a，a1）>1“，有重复项","")

填充到最后。

假设数据在A列中，在B列中插入一个空列作为次列，在b1中输入公式=countif（a：a，a1），然后向下复制公式，如果结果为1，则不重复，如果不是1，则重复。

假设具有重复值的单元格是 A 列。 使用函数 =countif（a：a，a：a） 输入，然后重复出现大于 1 的数字。 过滤掉它，你就可以开始了。

如果数据在A列，则先对A列进行排序，然后在B2中输入=A2=A1，然后下拉填充，所有true都是重复和多余的，直接删除即可。

Office 2007 方法：

选择要检查重复值的列，然后在“开始”菜单的“样式”功能区中选择“条件格式突出显示单元格规则重复值”。

在弹出的对话框中，根据提示单击“确定”，然后按颜色进行筛选。

如果单击工具栏中的“排序”按钮，重复的数据将排成一行。