用right函数，find函数，len函数=RIGHT(A1,LEN(A1)-FIND("-",A1,1))

1,4)--获取年份2009declare@bintset@b=patindex('%日%',@a)--获取'日'这个字符在字符串中的位置,即10selectsubstring(@a,6,@b-5)--获取日期'7月15日'

1、先将冒号后面的内容全部替换掉1.1用huanhang替换^p1.2把：*huanhang替换成：huanhang（此时要先勾上“使用通配符”）1.3用^p替换huanhang2、使用邮件合并的方式将excel中的内容读取到：后面。3、进行...

1、第一步，删除字符串C两端的空格，见下图，转到下面的步骤。2、第二步，完成上述步骤后，截取C的最左边的n个字符，见下图，转到下面的步骤。3、第三步，完成上述步骤后，截取C的最右侧n个字符，见下图，转到下面的...

可以使用函数提取一个字符串中的一段字符。MID用来返回文本字符串中从指定位置开始的特定数目的字符，该数目由用户指定。函数MID始终将每个字符（不管是单字节还是双字节）按1计数。语法：MID(text,start_num,num_...

最左边的红框可以是WithActiveSheeta=.Cells(Rows.Count,"G").End(xlUp).Offset(-1,0)EndWith

可以使用函数提取一个字符串中的一段字符。MID用来返回文本字符串中从指定位置开始的特定数目的字符,该数目由用户指定，函数MID始终将每个字符。应该用到三个字符串函数：LEFT、RIGHT、MIDLEFT函数用法：LEFT（要提取...

程序代码：代码文本（由于特殊符号可能无法显示，请以上图为准）：OptionExplicitSub宏1()Dimarr,i&,s$,t,j&arr=ActiveSheet.UsedRangeFori=2ToUBound(arr)s=""Ifarr(i,1)<>""Then...

Dimarr1()AsStringDimarr2()AsStringDimtxt1,txt2,txt3AsStringFori=1ToRange("A65536").End(xlUp).Rowarr1()=Split(Cells(i,1),"张三")IfUBound(arr1)>0ThenFor...

从第七个字符开始截取Subtt()a="asdf2rljsdf;lasdf"t=Mid(a,7.999)MsgBoxtEndSub