如何修剪单元格条目末尾的字母/字符

Question

我在这样的单元格中有条目：

75864543&m
2211842
1523674&mr
3452435tr

单元格具有不同数量的数值，有些单元格末尾有字符/字母。我希望除了数值之外修剪所有内容，但由于数值的长度变化而导致卡住。

有没有人有解决方法？

Answer 1

假设介于1和1之间。数据开头的9位数字（根据需要调整）您可以使用此公式

=LOOKUP(10^10,LEFT(A1,{1,2,3,4,5,6,7,8,9})+0)

Answer 2

尝试以下用户定义函数：

Public Function ReturnNumerals(rng As Range) As String
    Dim sStr As String, i As Long, sStr1 As String
    Dim sChar As String
      sStr = rng.Value
      For i = 1 To Len(sStr)
        sChar = Mid(sStr, i, 1)
        If sChar Like "[0-9]" Then
          sStr1 = sStr1 & sChar
        End If
      Next
    ReturnNumerals = sStr1
End Function

编辑＃1 ：

如果你是“恶作剧”或VBA因其他原因被排除，那么试试这个数组公式：

= MID（SUMPRODUCT（ - MID（ “01” ＆安培; A1，SMALL（（ROW（$ 1：$ 300）-1）* ISNUMBER（-MID（ “01” ＆安培; A1，ROW（$ 1：$ 300） ，1）），ROW（$ 1：$ 300））+ 1,1），10 ^（300-ROW（$ 1：$ 300））），2300）

必须使用 CNTRL-SHFT-ENTER 输入数组公式，而不只是输入 ENTER 键！

例如，如果A1包含：

a123wer98bg5

丑陋的数组公式将返回：

123985