学习VBA，报表做到飞 第四章 正则表达式 4.5 Replace与Test
yund56 2025-03-18 23:46 20 浏览
第四章 正则表达式
4.5 Replace与Test
在上一节“正则表达式的代码格式”里，我们了解了正则表达式的Execute方法的使用，现在就让我们通过一个案例来了解一下正则表达式的另外两个方法Replace与Test的使用。
小程序：
把下表左列中的联系方式提取出来，填入“联系方式”栏，其余内容填入“个人简介”栏。如果没有联系方式，则填“无”。
联系方式 | 个人简介 | |
钱大6498316，学生 | ||
赵二5678346，个体工商户 | ||
王小虎2395799，老师 | ||
李三自由职业者 |
Sub replace与test()
Dim reg As New RegExp
With reg
.Global = True
.Pattern = "\d+"
For Each ss In Range("a2", Cells(Rows.Count, 1).End(xlUp))
If .Test(ss) Then
Set 结果 = .Execute(ss)
ss.offset(0, 1) = 结果(0)
ss.offset(0, 2) = .replace(ss, "")
Else
ss.offset(0, 1) = "无"
ss.offset(0, 2) = ss
End If
Next
End With
End Sub
首先用Test方法测试单元格的内容是否能够匹配成功。如果成功返回True，把匹配到的内容填入“联系方式”栏，再用replace方法把匹配到的结果替换为空（这里的用法与VBA的Replace用法不同，在本章第3节已有介绍）。如果匹配不成功返回False，“联系方式”栏填“无”，把单元格内容填到“个人简介”栏。最后得到如下结果：
联系方式 | 个人简介 | |
钱大6498316，学生 | 6498316 | 钱大，学生 |
赵二5678346，个体工商户 | 5678346 | 赵二，个体工商户 |
王小虎2395799，老师 | 2395799 | 王小虎，老师 |
李三自由职业者 | 无 | 李三自由职业者 |
往期精彩回顾：
学习VBA，报表做到飞 第四章 正则表达式 4.4 正则表达式的代码格式
学习VBA，报表做到飞 第四章 正则表达式 4.3 正则表达式的方法和属性
学习VBA，报表做到飞 第四章 正则表达式 4.2 正则表达式的元字符和量词
我是云飞扬，职场财会人员，愿与大家分享表格制作和数据统计分析的技巧与方法，希望大家的工作更便捷，更轻松！
相关推荐
- SM小分队Girls on Top，女神战队少了f(x)?
-
这次由SM娱乐公司在冬季即将开演的smtown里，将公司的所有女团成员集结成了一个小分队project。第一位这是全面ACE的大姐成员权宝儿（BoA），出道二十年，在日本单人销量过千万，韩国国内200...
- 韩国女团 aespa 首场 VR 演唱会或暗示 Quest 3 将于 10 月推出
-
AmazeVR宣布将在十月份举办一场现场VR音乐会，观众将佩戴MetaQuest3进行体验。韩国女团aespa于2020年11月出道，此后在日本推出了三张金唱片，在韩国推出了...
- 韩网热议!女团aespa成员Giselle在长腿爱豆中真的是legend
-
身高163的Giselle，长腿傲人，身材比例绝了...
- 假唱而被骂爆的女团:IVE、NewJeans、aespa上榜
-
在韩国，其实K-pop偶像并不被认为是真正的歌手，因为偶像们必须兼备舞蹈能力、也经常透过对嘴来完成舞台。由于科技的日渐发达，也有许多网友会利用消音软体来验证K-pop偶像到底有没有开麦唱歌，导致假唱这...
- 新女团Aespa登时尚大片 四个少女四种style
-
来源：环球网
- 韩国女团aespa新歌MV曝光 画面梦幻造型超美
-
12月20日，韩国女团aespa翻唱曲《DreamsComeTrue》MV公开，视频中，她们的造型超美！WINTER背后长出一双梦幻般的翅膀。柳智敏笑容甜美。宁艺卓皮肤白皙。GISELLE五官精致...
- 女网友向拳头维权，自称是萨勒芬妮的原型?某韩国女团抄袭KDA
-
女英雄萨勒芬妮（Seraphine）是拳头在2020年推出的第五位新英雄，在还没有正式上线时就备受lsp玩家的关注，因为她实在是太可爱了。和其他新英雄不同的是，萨勒芬妮在没上线时就被拳头当成虚拟偶像来...
- 人气TOP女团是?INS粉丝数见分晓;TWICE成员为何在演唱会落泪?
-
现在的人气TOP女团是？INS粉丝数见分晓！现在爱豆和粉丝之间的交流方法变得多种多样，但是Instagram依然是主要的交流手段。很多粉丝根据粉丝数评价偶像的人气，拥有数百、数千万粉丝的组合作为全球偶...
- 韩国女团MVaespa Drama MV_韩国女团穿超短裙子跳舞
-
WelcometoDrama.Pleasefollow4ruleswhilewatchingtheDrama.·1)Lookbackimmediatelywhenyoufe...
- aespa师妹团今年将出道! SM职员亲口曝「新女团风格、人数」
-
记者刘宛欣／综合报导南韩造星工厂SM娱乐曾打造出东方神起、SUPERJUNIOR、少女时代、SHINee、EXO等传奇团体，近年推出的aespa、RIIZE更是双双成为新生代一线团体，深受大众与粉丝...
- 南韩最活跃的女团aespa，新专辑《Girls》即将发布，盘点昔日经典
-
女团aespa歌曲盘点，新专辑《Girls》即将发布，期待大火。明天也就是2022年的7月8号，aespa新专辑《Girls》即将发行。这是继首张专辑《Savage》之后，时隔19个月的第二张专辑，这...
- 章泽天女团aespa出席戛纳晚宴 宋康昊携新片亮相
-
搜狐娱乐讯（山今/文玄反影/图科明/视频）法国时间5月23日晚，女团aespa、宋康昊、章泽天等明星亮相戛纳晚宴。章泽天身姿优越。章泽天肩颈线优越。章泽天双臂纤细。章泽天仪态端正。女团aespa亮...
- Aespa舞台暴露身高比例，宁艺卓脸大，柳智敏有“TOP”相
-
作为SM公司最新女团aespa，初舞台《BlackMamba》公开，在初舞台里，看得出来SM公司是下了大功夫的，虽然之前SM公司新出的女团都有很长的先导片，但是aespa显然是有“特殊待遇”。运用了...
- AESPA女团成员柳智敏karina大美女
-
真队内速度最快最火达成队内首个且唯一两百万点赞五代男女团中输断层第一（图转自微博）...
- 对来学校演出的女团成员语言性骚扰?韩国这所男高的学生恶心透了
-
哕了……本月4日，景福男子高中相关人士称已经找到了在SNS中上传对aespa成员进行性骚扰文章的学生，并开始着手调查。2日，SM娱乐创始人李秀满的母校——景福高中迎来了建校101周年庆典活动。当天，S...
- 一周热门
- 最近发表
-
- SM小分队Girls on Top，女神战队少了f(x)?
- 韩国女团 aespa 首场 VR 演唱会或暗示 Quest 3 将于 10 月推出
- 韩网热议!女团aespa成员Giselle在长腿爱豆中真的是legend
- 假唱而被骂爆的女团:IVE、NewJeans、aespa上榜
- 新女团Aespa登时尚大片 四个少女四种style
- 韩国女团aespa新歌MV曝光 画面梦幻造型超美
- 女网友向拳头维权，自称是萨勒芬妮的原型?某韩国女团抄袭KDA
- 人气TOP女团是?INS粉丝数见分晓;TWICE成员为何在演唱会落泪?
- 韩国女团MVaespa Drama MV_韩国女团穿超短裙子跳舞
- aespa师妹团今年将出道! SM职员亲口曝「新女团风格、人数」
- 标签列表
-
- filter函数js (37)
- filter函数excel用不了 (73)
- 商城开发 (40)
- 影视网站免费源码最新版 (57)
- 影视资源api接口 (46)
- 网站留言板代码大全 (56)
- java版软件下载 (52)
- java教材电子课本下载 (48)
- 0基础编程从什么开始学 (50)
- java是用来干嘛的 (51)
- it入门应该学什么 (55)
- java线上课程 (55)
- 学java的软件叫什么软件 (38)
- 程序开发软件有哪些 (53)
- 软件培训 (59)
- 机器人编程代码大全 (50)
- 少儿编程教程免费 (45)
- 新代系统编程教学 (61)
- 共创世界编程网站 (38)
- 亲测源码 (36)
- 三角函数积分公式表 (35)
- 函数的表示方法 (34)
- 表格乘法的公式怎么设置 (34)
- sumif函数的例子 (34)
- 图片素材 (36)