如何利用正则表达式批量替换img标签中alt的内容
1个回答
展开全部
Sub rex()
Dim s$, ss$, sRpl$
Dim re As New RegExp
ss = "<img alt=""sss"" src="""" ,width="""" ,height=""""/>"
sRpl = "2015 hot sales video converter"
re.Pattern = "(<img[^>]*alt="")(.*?)(""[^>]*/>)"
s = re.Replace(ss, "$1" & sRpl & "$3")
Debug.Print s
End Sub
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询