Tony在工作表中有一堆由数字和其他字符组成的数据。例如，他可能有一个包含“ 1234567Blue”的单元格。 Tony希望能够找出出现第一个非数字字符的字符位置。在文本“ 1234567Blue”的示例中，Tony希望通过某种方式来找出第一个非数字字符位于位置8。

有两种获取所需价值的主要方法。首先是使用数组公式来计算位置。在大多数情况下，以下数组公式（使用Ctrl + Shift + Enter输入）将起作用：

=MATCH(TRUE,ISERROR(VALUE(MID(A1,ROW(INDIRECT("1:"&LEN(A1))),1))),0)

该数组公式不起作用的唯一实例是单元格A1为空或包含严格的数值。如果您的列表可能包含此类数据（或根本没有数据），则应考虑使用稍长的数组公式：

=IF(LEN(A1)=0,0,MIN(IF(1ISNUMBER(1MID(A1,ROW(INDIRECT("A1:A"& LEN(A1))),1))=0,ROW(INDIRECT("A1:A"&LEN(A1))),LEN(A1)+1)))* (ISNUMBER(A1)=FALSE)

请记住，这是一个单个数组公式，使用Ctrl + Shift + Enter输入。它将正确处理A1不包含非数字字符的情况（例如在空白单元格或诸如“ 123”的值中）。

当然，找到第一个非数字字符的位置的另一种方法是创建用户定义的函数。有许多不同的方法可以实现这种宏。实现宏的最简单方法之一是简单地逐步传递传递给宏的任何字符。如果找到的字符不在数字的ASCII码范围内（48到57），则说明已找到第一个位置。下面的宏显示了一种执行这种技术的方法：

Function FirstNonDigit(str As String)

Dim iChar As Integer     Dim iPos As Integer     Dim J As Integer

Application.Volatile     iPos = 0     For J = 1 To Len(str)

iChar = Asc(Mid(str, J, 1))

If iChar <= 47 Or iChar >= 58 Then             iPos = J             Exit For         End If     Next J     FirstNonDigit = iPos End Function

要使用该函数，只需在工作表中使用如下公式：

=FirstNonDigit(A1)

如果您引用的单元格为空或仅包含数字，则该函数返回0值。

注意：

如果您想知道如何使用此页面（或_ExcelTips_网站上的任何其他页面）中描述的宏，我准备了一个特殊页面，其中包含有用的信息。

链接：/ excelribbon-ExcelTipsMacros [点击此处在新的浏览器标签中打开该特殊页面]。

_ExcelTips_是您进行经济高效的Microsoft Excel培训的来源。

本技巧（3364）适用于Microsoft Excel 97、2000、2002和2003。可以在以下功能区中为Excel的功能区界面（Excel 2007及更高版本）找到本技巧的版本：

链接：/ excelribbon-Finding_the_First_Non-Digit_in_a_Text_Value [查找文本值中的第一个非数字]。