Excel 2013:VBA查找具有重复ID文本的所有单元格，并将单元格内容转储到第二张工作表

不确定标题是否很清楚

基本上，我在这张表的B列中有大约500行包含Nessus漏洞扫描数据。关键元素是“插件ID:######”文本。在上面的几列中，插件ID/vuln与一组主机绑定

一些插件ID在500行中多次出现，但是，由于这些数据是临时的（每月一次），我们进行新的扫描，有时它在旧主机上是固定的，但由于某种原因，新主机现在具有该漏洞，有时它是混合的（几个主机将被固定，其他主机不会，新主机也会出现相同的问题）

（B） 插件ID:123456（J）服务器1、服务器2、服务器3

（B） 插件ID:123456（J）服务器1、服务器2

我想要一个VBA函数，它从B列的每个单元格中获取插件ID，搜索B列的其余部分是否有重复项，然后将B列单元格及其行内容从J列复制到新的工作表中，以获得原始和每个重复项，这样，我就可以根据Nessus的说法查看行并确定实际修补的内容

事实上，我可以通过过滤手动完成这项工作，但它既慢又繁重

---

我应该从哪里开始？我总是忙于决定我应该使用老式的VBA函数还是使用一些新的内置Excel VBA函数和工具

为什么选择VBA？只需使用COUNTIF检查ID重复了多少次，并过滤公式列中count>1的行。还要对ID列进行排序，使重复的行彼此相邻

e、 g

=COUNTIF(B$3:B$7;B3)