VBA如何替换文本里指定指定位置的字符串

mol1981

各位老师好：
问题：
字符串1：abcdefghijklmnopqrstuvwxyz
从字符串的第四个字符串开始连续替换6个字符为新字符123456
替换结果为：abc123456jklmnopqrstuvwxyz

用vba代码的方式如何实现上述操作，谢谢

feilanga

............

醉眼看尘世

tmpstr=left(tmsptr,3) & "123456" & right(tmpstr,len(tmpstr)-9)

醉眼看尘世

dim tmPstr$
tmpstr="abcdefghijklmnopqrstuvwxyz"
tmpstr=left(tmpstr,3) & "123456" & right(tmpstr,len(tmpstr)-9)

rysxing

str='abcdefghijklmnopqrstuvwxyz';
str.replace(str.substr(3,6),'123456');

rysxing

1. str='abcdefghijklmnopqrstuvwxyz';
   
2. str.replace(str.substr(3,6),'123456')

复制代码

kevinchengcw

dim s$
s="abcdefghijklmnopqrstuvwxyz"
mid(s,4,6)="123456"
msgbox s

tspliu

                                                如下 ：