excel 去除特殊字符,仅保留中英文字符和数字

在 Excel 中,如果你想去除特殊字符,仅保留中英文字符与数字,你可以使用 VBA 来创建一个自定义函数。以下是具体步骤和代码:

一、创建自定义函数

1、打开 VBA 编辑器:

按 Alt + F11 打开 VBA 编辑器。

2、插入新模块:

在 VBA 编辑器中,点击 Insert -> Module,新建一个模块。

3、输入以下 VBA 代码:

bash 复制代码
Function KeepCNEnglishNumbers(inputText As String) As String
    Dim i As Integer
    Dim currentChar As String
    Dim resultText As String
    
    resultText = ""
    
    For i = 1 To Len(inputText)
        currentChar = Mid(inputText, i, 1)
        ' Check if the character is an English letter, digit or Chinese character
        If (currentChar Like "[A-Za-z0-9]" Or _
            (AscW(currentChar) >= 19968 And AscW(currentChar) <= 40869)) Then
            resultText = resultText & currentChar
        End If
    Next i
    
    KeepCNEnglishNumbers = resultText
End Function

二、使用自定义函数

1、返回 Excel 工作表:

关闭 VBA 编辑器回到 Excel。

2、应用这个函数:

例如,在单元格 B1 中使用公式处理 A1 单元格的数据:

excel

=KeepCNEnglishNumbers(A1)

3、填充公式:

如果需要对其他单元格应用这个筛选,可以将公式向下拖拽。

三、代码说明

Mid 函数:从字符串中提取每一个字符。

Like "A-Za-z0-9":检查字符是否为英文字母或者数字。

AscW 函数:获取 Unicode 码,确认字符是否在常用的中文字符范围内。

中文字符匹配:

常用汉字的 Unicode 码范围大概是 19968 到 40869。

通过这个方法,你可以有效地去除所有特殊字符,仅保留中英文字符和数字。

相关推荐
Non-existent98711 天前
WPS批量清理单元格空白字符的4种方法-异常数字格式处理-实战
excel·wps
Channing Lewis11 天前
PHP 解析 Excel 的那些坑:一次“行号错位”引发的数据丢失
开发语言·php·excel
jarreyer11 天前
【数据分析绘图】excel绘图和bi工具区别
数据挖掘·数据分析·excel
chatexcel11 天前
ChatExcel Max使用教程:图片、PDF、网页与复杂Excel的一站式数据分析
数据分析·pdf·excel
cngkqy11 天前
excel从某一列中用match筛选匹配的数据
excel
qq_5469372711 天前
Excel批量转PDF_Word_图片,支持自动合并报表,效率翻倍。
pdf·word·excel
ai_coder_ai11 天前
在自动化脚本中操作excel文件
运维·自动化·excel
三千花灯11 天前
【Playwright】 自动化测试之参数化登录(Excel/CSV 数据源)
人工智能·机器学习·excel
罗政11 天前
AI工作流实现Excel全自动化(支持SQL)-案例:医院门诊排班表
人工智能·自动化·excel
小妖66611 天前
excel 怎么在单元格内容自动加上一段文字不能用公式
excel·vba