,我们可以沿着 MyStudio的方式做一些事情。插入(位置,Word)。有没有一种方法可以在Excel VBA的字符串中执行相同的操作?在我的工作表中,有一个字符串如下所示:01/01/995,我想在年份中插入一个1,所以将其设置为01/01/1995
尺寸测试\u日期为字符串
测试日期=“01/25/995”
测试日期=中间(测试日期,1,10)和;"一"及;中期(测试日期,11月4日)
还有其他更简单/更优雅的方法吗
我不认为有一个更干净的方法来做它,所以你可以把它包装成一个函数。另一种方法是使用replace,但它不是一种清洁剂
函数插入(源作为字符串,str作为字符串,i作为整数)作为字符串
插入=替换(震源、tmp、str和右侧(震源、Len(震源)-i))
端函数
或者只是修改你所拥有的
函数插入(源作为字符串,str作为字符串,i作为整数)作为字符串
插入=中间(源,1,i)&;str&;中间(震源,i+1,透镜(震源)-i)
端函数