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