如何在 Excel 中仅从包含数字和文本的单元格中删除文本?
如果您曾经需要处理 Excel 中的一些单元格混合文本和数字的数据,您就会知道区分这两者有多么困难。无论您是在处理调查数据、财务数据还是任何其他数据集,正确清理和整理数据都至关重要。在本教程结束时,您将全面了解可以用来成功完成此数据清理操作的多种策略。
仅从包含数字和文本的单元格中删除文本
在这里,我们将创建一个 VBA 模块,然后选择单元格范围来完成任务。因此,让我们看看一个简单的过程,了解如何在 Excel 中仅从包含数字和文本的单元格中删除文本。
步骤 1
考虑一个 Excel 表格,其中您有一系列包含文本和数字的字符串,类似于下图。

首先,右键单击工作表名称并选择“查看代码”以打开 VBA 应用程序。
右键单击 > 查看代码。
步骤 2
然后单击“插入”并选择“模块”,然后将以下代码复制到文本框中。
插入 > 模块 > 复制。
代码
Function OnlyNums(strWord As String)
Dim strChar As String
Dim x As Integer
Dim strTemp As String
strTemp = ""
Application.ScreenUpdating = False
For x = 1 To Len(strWord)
strChar = Mid(strWord, x, 1)
If Asc(strChar) >= 48 And _
Asc(strChar) <= 57 Then
strTemp = strTemp & strChar
End If
Next
Application.ScreenUpdating = True
OnlyNums = Val(strTemp)
End Function
Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
If Not Intersect(Target, Range("A1:B10")) Is Nothing Then Cancel = True
End Sub

步骤 3
然后使用 Alt + Q 关闭 VBA。然后单击一个空单元格并输入公式 =OnlyNums(A2),单击回车,然后使用自动填充柄向下拖动。

结论
在本教程中,我们使用了一个简单的示例来演示如何在 Excel 中仅从包含数字和文本的单元格中删除文本,以突出显示特定数据集。
广告
数据结构
网络
关系型数据库管理系统
操作系统
Java
iOS
HTML
CSS
Android
Python
C 编程
C++
C#
MongoDB
MySQL
Javascript
PHP