Home |
Search |
Today's Posts |
#1
|
|||
|
|||
Add 0 before decimal point through VBA
Hi,
In my MS Word document, there are about 50 pages. I need to add "0" where decimal value is in this format .25 or any Number. I need VBA code. I have tried with below, but it is time consuming is there other way of doing same. Sub a() With ActiveDocument For i = 1 To .Words.Count If .Words(i).Text = "." Then If IsNumeric(.Words(i).Text & .Words(i + 1).Text) And .Words(i - 1).Text "0" Then .Words(i).Text = "0" & .Words(i).Text i = i + 2 End If End If Next End With End Sub Thanks in advance Regards, Sudhir. |
Thread Tools | |
Display Modes | |
|
|
Similar Threads | ||||
Thread | Forum | |||
align numbers by decimal point | Tables | |||
decimal point | Tables | |||
Getting Decimal Point With Mail Merge | Mailmerge | |||
Decimal Point alignment | Tables | |||
Change a decimal point (.) by coma (,) | Mailmerge |