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。

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

相关推荐
开开心心_Every37 分钟前
多连接方式的屏幕共享工具推荐
运维·服务器·pdf·电脑·excel·tornado·dash
Jun6261 天前
QT(4)-EXCEL操作
开发语言·qt·excel
2501_907136821 天前
Excel文件强效安全修复工具-清理安全风险 可修复WPS编辑后Excel无法打开的文件
excel·wps
一位代码1 天前
Excel 文本连接符 & :基础用法与进阶技巧详解
excel
焱文8191 天前
wps excel指定数据区域,二维码生成区域,批量生成单元格二维码VBA宏代码
excel·wps
夏天里的肥宅水1 天前
EXCEL生成日历
excel
我命由我123452 天前
Excel - Excel 单元格格式同时设置日期时间
运维·学习·职场和发展·excel·求职招聘·职场发展·学习方法
我命由我123452 天前
Excel - Excel 覆盖模式与编辑模式
运维·学习·职场和发展·excel·求职招聘·职场发展·运维开发
溜达的大象2 天前
Ubuntu服务器之间校时
linux·ubuntu·excel
_小许_2 天前
Go语言导入与导出excel文件
开发语言·golang·excel