WORD怎么自动查找带有相同汉字的短语归类一起?

WORD怎么自动查找带有相同汉字的短语归类一起?
例如下面的文档,只查找括号内的汉字.
“?”代表任意字符（有可能是汉字,但不需查找）.
“*”代表数字或字母.
即只查找括号内汉字,外面的汉字不查找,归类时要带上这个汉字的一整条内容.
?（外国人*）?
?（社会人*）?
?（中国人*）?
?（美国人*）?
?（中间*）?
按顺序查找带相同汉字的短语归类后 如下：
外
?（外国人*）?
国
?（外国人*）?
?（中国人*）?
?（美国人*）?
人
?（外国人*）?
?（社会人*）?
?（中国人*）?
?（美国人*）?
?（人间*）?
社
?（社会人*）?
会
?（社会人*）?
中
?（中国人*）?
?（中间*）?
美
?（美国人*）?
间
?（中间*）?
?（人间*）?
补充：举例的原文档内容漏了下面一行
?（人间*）?（在举例的分类完成文档里是有的.）
懂VB代码的请帮助一下吧,代码请发至351649048@qq.com
第一次在百度知道问问题,以前都是只搜索的.解决问题后,追加150分再采纳答案.请帮忙吧.