document.selection.Replace "(\w)[-：:\s](\w+)","\1#\2@\1,^\1#\2@\2的\1",eeFindNext Or eeReplaceAll Or eeFindReplaceRegExp