Repalace函数是vba中常用的字符替换函数,本文介绍了replace的基本使用方法,6个参数的意思。
Sub replacetest()
Dim str As String
Dim str2 As String
str = "ababab"
'vba.Replace("在哪儿找","找什么(需要被替换掉的部分)","换成什么","从第几个字符开始找","替换几次","匹配方式")
'一共六个参数
'例1
str2 = Replace(str, "a", 1)
'把str中的全部替换为1
'str2 会被替换成1b1b1b
'例2
str2 = Replace(str, "a", 1, 3)
'第四个参数说明从第3个字符开始替换,替换结果会舍掉前两个字符。
'str2会被替换成1b1b
'例3
str2 = Replace(str, "a", 1, 3, 1)
'第五个参数是替换次数,默认是替换全部,设置为1的话,就只替换第一次出现的a;
'这句代码的意思是从第3个开始的第1个a
'str2会被替换为1bab
'例4
str2 = Replace(str, "A", 1, , , vbBinaryCompare)
'第六个参数为二进制匹配时,区分大小写;结果为ababab
str2 = Replace(str, "A", 1, , , vbTextCompare)
'第六个参数为文本匹配时,不区分大小写;结果为1b1b1b
MsgBox str2
End Sub
来源:CSDN
作者:jzkwf705
链接:https://blog.csdn.net/jzkwf705/article/details/104591491