Excel正则表达式添加2个空格而不是一个空格

时间:2016-08-19 19:28:53

标签: regex excel vba

我在Excel中使用以下功能来分割某些数据的上限。如何调整它以在单词之间添加2个空格,例如Mike Jones,而不是像现在一样。简单的答案我确定,但RegEx在最好的时候会让我困惑。

Function SplitCaps(strIn As String) As String
Dim objRegex As Object
Set objRegex = CreateObject("vbscript.regexp")
With objRegex
    .Global = True
    .Pattern = "([a-z])([A-Z])"
    SplitCaps = .Replace(strIn, "$1 $2")
End With
End Function

3 个答案:

答案 0 :(得分:1)

非常简单:在2个正则表达式组$ 1和$ 2之间添加额外的空格

SplitCaps = .Replace(strIn, "$1  $2")

答案 1 :(得分:0)

我认为你需要的只是

    ([a-zA-Z]*\s*[a-zA-Z]*)*

答案 2 :(得分:0)

你试过添加' \ s&#39 ;?这应该是一个评论,但我现在不能评论。 尝试: 您可以使用\ s:

添加额外的空白区域
    SplitCaps = .Replace(strIn, "$1\s\s$2")