excel vba replace函数的使用方法

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