sinat_29571715的博客

原创 用VBA截取excel中【第一个字符到倒数第一个不是数字或字母的字符串】

今天帮表哥研究了一下，成功实现了这一功能，好开心啊~~Sub bianLi()Dim str2, sFor lie = 2 To 1663a = Cells(lie, 2)s = a    For i = 1 To Len(s) - 1        char = (Left(Right(s, i), 1))        iA = Asc(char)