字符串的查找与替换
难度系数:初级
系统:Windows 7
软件:Excel 2010
学习路径图:
- 针对之前的学习路径图,会针对的写一些文章
- 今天讲讲字符串的查找与替换:
InStr
,Find
,Substitute
Part 1:函数功能介绍
- InStr,判断字符串1是否包含字符串2
- Find,寻找字符串1在字符串2中出现的位置(从1开始)
- Substitute,将字符串中的信息替换为新的信息
Part 2:代码
Sub 查找与替换()
x1 = "def-a-new-function"
x2 = "def"
x3 = "e"
If InStr(x1, x2) <> 0 Then
Debug.Print ("位置1:x1中包含x2")
Else
Debug.Print ("位置2:x1中不包含x2")
End If
pos = Application.Find(x3, x1)
Debug.Print ("位置3:" & pos)
y = Application.Substitute(x1, "e", "a")
Debug.Print ("位置4:" & y)
End Sub
代码截图
运行结果
Part 3:部分代码解读
-
InStr(x1, x2)
,通过将结果与0进行比较,判断x1中是否包含x2 -
Application.Find(x3, x1)
,判断x3首次在x1中出现的位置,其为工作表函数,即在Excel公式中也可以使用 -
Application.Substitute(x1, "e", "a")
,将x1中所有e字符全部替换为a - 这些函数还有其它一些参数,可以个性化做一些设置,具体可以F1查看一下帮助文件
官方帮助
- 如需文中高清并可以无限放大路径图,可以文后留言留下邮箱,小编会发过去
- 本文为原创作品,如需转载,可加小编微信号
learningBin
更多精彩,请关注微信公众号
扫描二维码,关注本公众号