nnsea 发表于 2023-10-25 23:57:20

去除重复字VBA


Sub 去除重复字()

Dim regx As Object

Set regx = CreateObject("vbscript.regexp")

With regx

.Global = True

.Pattern = "(就会)+"

= .Replace(.Value, "就会")

End With

End Sub

页: [1]
查看完整版本: 去除重复字VBA