文档介绍：Excel字符串截取函数一:函数理论知识学习截取Excel字符串的部分字符,我们可以使用Mid、Left、Right等函数从长字符串内获取一部分字符。①LEFT函数:LEFT(text,num_chars)Text是包含要提取字符的文本串。Num_chars指定要由LEFT所提取的字符个数,该函数从左边开始提取字符。②MID函数:MID(text,start_num,num_chars)Text是包含要提取字符的文本串。Start_num是文本中要提取的第一个字符的位置。num_chars是要提取的字符个数,从左边开始提取字符。③RIGHT函数:RIGHT(text,num_chars)Text是包含要提取字符的文本串。Num_chars指定希望RIGHT提取的字符个数。该函数从右边开始提取字符。二:函数应用实例提取Excel字符串中的数字在处理账务中,一般单位名称是放在表格的右上角,但有时单位是不固定的,比较有时是吨,有时是件,有时是箱,这时单位就不便放在表格上面,因为这样不能反应真实的信息,而如果把这些单位直接输入到表格中,在计算时会就遇到问题,我的解决方法是,把这些单位也输入,在计算时把字符串的数字提出来。用VBA实现:实现环境:Excel2003,WindowsXP。打开Excel,按ALT+F11,打开VisualBasic编辑器,双击VBAProject,双击模块,再双击模块,如下图所示:输入如下代码:FunctionAtoN(StrAsString)IfIsNumeric(Str)ThenAtoN=StrElseFori=Len(Trim(Str))To1Step-1a=Mid(Str,i,1)Ifa="."Thenn=a+nIfIsNumeric(a)Thenn=a+nElsei=iEndIfNextiAtoN=nEndIfEndFunction关闭VisualBasic编辑器,点击地址栏上的插入函数按钮,在类型列表里选择用户定义,这里就会显示刚才定义的函数。如下图所示:测试: