电脑教程
位置:首页>> 电脑教程>> office教程>> 如何使用Excel 2013/2016中的用户定义函数或VBA宏从字符串中删除非字母数字字符

如何使用Excel 2013/2016中的用户定义函数或VBA宏从字符串中删除非字母数字字符

  发布时间:2022-05-30 12:14:43 

标签:如何,使用,Excel,2013,2016,中的,用户,定义,函数

本文将讲述如何在Excel中从给定单元格中的文本字符串中删除所有非字母数字字符。如何使用Excel 2013/2016中的用户定义函数或VBA宏从字符串中删除非字母数字字符。

  • 使用用户定义的函数删除所有非字母数字字符

  • 使用VBA宏删除所有非字母数字字符

使用用户定义的函数删除所有非字母数字字符


假设您有一个包含文本字符串值的范围A1:A3中的数据列表,并且您只想从这些单元格中删除所有非字母数字字符并保留其他字母数字字符。怎么做。您需要记下Excel VBA宏以实现快速删除所有非字母数字字符的结果。只需执行以下步骤:

步骤1:打开您的Excel工作簿,然后单击开发工具选项卡下的“Visual Basic”命令,或者只需按“ALT + F11”快捷方式。

如何使用Excel 2013/2016中的用户定义函数或VBA宏从字符串中删除非字母数字字符

步骤2:然后将出现“Visual Basic编辑器”窗口。

如何使用Excel 2013/2016中的用户定义函数或VBA宏从字符串中删除非字母数字字符

步骤3:单击“插入” – >“模块”以创建新模块。

如何使用Excel 2013/2016中的用户定义函数或VBA宏从字符串中删除非字母数字字符

步骤4:将以下VBA代码粘贴到代码窗口中。然后单击“保存”按钮。

如何使用Excel 2013/2016中的用户定义函数或VBA宏从字符串中删除非字母数字字符

Function RemoveNonAlpha(str As String) As String    Dim ch, bytes() As Byte: bytes = str    For Each ch In bytes        If Chr(ch) Like "[A-Z.a-z 0-9]" Then RemoveNonAlpha = RemoveNonAlpha & Chr(ch)    Next chEnd Function

0
投稿

猜你喜欢

手机版 电脑教程 asp之家 www.aspxhome.com