仟佰轉:
很简单的,用宏,代码如下:======================SUbdelchar()dimlngiaslongdimlngcountaslonglngcount=inputbox("请输入要删除的字数","间隔删除字符",1)Forlngi=lngcountto1step-1selection.moverightunit:=wdcharacter,count:=1selection.moverightunit:=wdcharacter,count:=1,extend:=wdextend....