Excel 正则表达式提取值

简介: 版权声明:本文为博主原创文章,未经博主允许不得转载。 https://blog.csdn.net/catoop/article/details/70247105 快捷键 Alt ...
版权声明:本文为博主原创文章,未经博主允许不得转载。 https://blog.csdn.net/catoop/article/details/70247105
快捷键 Alt +F11 打开代码视图


代码:
Function GetStr(rng As Range)
    With CreateObject("VBscript.regexp")
        .Global = True
        .Pattern = "\d+\*\d+\+{0,1}\d{0,}"    '表达式
        If .Execute(rng).Count = 0 Then
            GetStr = ""
        Else
            GetStr = .Execute(rng)(0)
        End If
    End With
End Function

函数 GetStr 就编写完成了,使用方法截图如下:
本例是从源数据中提取字符串

 
 测试数据如下:
60*112mm, ,胶袋
无品牌,Kurio X Screen Protector,130*74mm,无保护贴,胶袋
75*115mm, ,胶袋
190*255mm, ,装iPad保护贴,胶袋,胶袋
无品牌,Kurio 7S Screen Protector,193*120mm,无保护贴,胶袋
180*95mm,平口袋,胶袋
61*115mm, ,胶袋
65*120mm, ,胶袋
135*76mm, ,1308touch5胶袋。,胶袋
65*130mm, ,胶袋
143*74(开口方向)mm,胶袋
120*95mm, ,开口95mm,胶袋
75*130+25mm, ,胶袋


目录
打赏
0
0
0
0
160
分享
相关文章
Excel条件格式高级应用
【10月更文挑战第20天】Excel条件格式高级应用
87 3
|
4月前
|
Excel条件格式
【10月更文挑战第21天】Excel条件格式
125 2
|
6月前
Excel 条件格式
Excel 条件格式
41 0
实战 | JAVA读取WORD,包含表格。
实战 | JAVA读取WORD,包含表格。
373 0
使用EasyExcel导入excel中的日期格式数据时获取到的却是一个数字
使用EasyExcel导入excel中的日期格式数据时获取到的却是一个数字
926 0
Python 读取 Excel 中符合特定条件的数据,并写入新的表格
Python 读取 Excel 中符合特定条件的数据,并写入新的表格
385 0
Python 读取 Excel 中符合特定条件的数据,并写入新的表格
三行代码将Excel转为任意格式的Word
大家好,我是志斌~ 今天来跟大家分享一个实际案例需求,本文来自小明大佬的创作~
215 0
三行代码将Excel转为任意格式的Word
java实现csv大文件拆分,每个小文件都有标题行
java实现csv大文件拆分,每个小文件都有标题行
815 0
java实现csv大文件拆分,每个小文件都有标题行
AI助理

你好,我是AI助理

可以解答问题、推荐解决方案等