excel如何合并相同用户号的数据并导入到Word文档？

问：工作表中含有大量的用户数据，要求合并相同用户号的数据并导入到Word文档。

例如下图简化了的示例工作表：

需要分别将户号“2021102788”、”2021110115“、……等等相对应的所有姓名找出来并将其合并在一起后导入到Word文档（如下图所示是户号为“2021102788”的结果），该如何实现？

答：可以使用两次高级筛选后得到结果，然后导出到Word文档。

具体思路

1.使用“户号”作为标题，筛选出不重复的户号列表。

2.遍历这个不重复的户号列表，并以户号和每个列表数据（即具体的户号数据）作为筛选条件，分别筛选出与户号对应的所有姓名。

3.分别将户号和相应筛选出的姓名导入到Word并命名。（例如，本示例中有3个户号，就会得到3个不同的Word文档，其内容为户号和姓名）。

VBA代码

说明

代码注释有详细的说明，有助于对代码的理解。

本示例有两个过程，其中主过程FinaDataAndExportToWord()过程调用ExportToWord()过程。ExportToWord过程用于输出数据到Word文档。