document.selection.Replace "[⒈⒉⒊⒋⒌⒍⒎⒏⒐⒑⒒⒓⒔⒕⒖⒗⒘⒙⒚]","",eeFindNext Or eeReplaceAll Or eeFindReplaceRegExp
document.selection.Replace "例句：","例：",eeFindNext Or eeReplaceAll
document.selection.Replace "▼.+\n","",eeFindNext Or eeFindReplaceEscSeq Or eeReplaceAll Or eeFindReplaceRegExp
document.selection.Replace "　","",eeFindNext Or eeReplaceAll
document.selection.Replace " ","",eeFindNext Or eeFindReplaceEscSeq Or eeReplaceAll Or eeFindReplaceRegExp
document.selection.Replace "\d\.","",eeFindNext Or eeFindReplaceEscSeq Or eeReplaceAll Or eeFindReplaceRegExp
document.selection.Replace "：.+\n例：","：",eeFindNext Or eeFindReplaceEscSeq Or eeReplaceAll Or eeFindReplaceRegExp
document.selection.Replace "(\w+)[-：:](.+)","\1#\1@\2",eeFindNext Or eeReplaceAll Or eeFindReplaceRegExp