Excel 2013-如何仅从不同位置删除数字并以不同的符号，字母开头

我想建议VBA宏，这是最快的方法，也易于使用。

Function ExtractTextOnly(pWorkRng As Range) As String

Dim xValue As String
Dim OutValue As String

xValue = pWorkRng.Value

For xIndex = 1 To VBA.Len(xValue)
    If Not VBA.IsNumeric(VBA.Mid(xValue, xIndex, 1)) Then
        OutValue = OutValue & VBA.Mid(xValue, xIndex, 1)
    End If
Next
ExtractTextOnly = OutValue

End Function

这个怎么运作：

1. 要打开VB编辑器，请按Alt + F11或右键单击“工作表”选项卡，然后单击“查看代码”。
2. 单击插入，然后选择模块。
3. 粘贴此代码到中号odule和关闭VB编辑器。

NB

不要忘了小号AVE的工作簿启用宏的工作簿。

1. 单元格中的公式M52（将其填满）：

=ExtractTextOnly(L52)

根据需要调整公式中的单元格引用。