Take the tour ×  I can't change number format. I use RegExp and
read numbers from doc file, but I doesn't change format. Comment
row is problem.  Sub ChangeNumberFormat()  Dim SectionText As
String Dim RegEx As Object, Matches As Object, Match As Object
Dim i As Integer  Set RegEx = CreateObject("vbscript.regexp")
With RegEx     .Global = True     .MultiLine = False
.Pattern =
"(\d{1,3}\s(\d{3}\s)*\d{3}(\,\d{1,3})?|\d{1,3}\,\d{1,3})" End
With  For i = 1 To ActiveDocument.Sections.Count()
SectionText = ActiveDocument.Sections(i).Range.Text     If
RegEx.Test(SectionText) Then         Set Matches =
RegEx.Execute(SectionText)          For Each Match In Matches
**Match = Format(Match, "##,##0.00")**             MsgBox Match
Set MsgMatches = Nothing         Set    Match = Nothing      End
If  Set RegEx = Nothing End Sub share|improve this question What
are some example values of Match (pre-formatting)? –  Tim
Williams Nov 30 '12 at 21:19 Example 10,345.34 –  vili Dec 1 '12
at 8:04 add c