document.selection.Replace "(.+)#(.+)@(.+)","^\1#\2@\3的\1,\1#\2@\3",eeFindNext Or eeReplaceAll Or eeFindReplaceRegExp