I need to apply "LtrRun" for all digits with dots between through document. I recorded macro with step and repeat it many but I need this macro to run through document without clicking it many times till end. any help?
Code:
Sub Dots()
'
' Num.Dots Macro
'
'
Application.Browser.Next
WordBasic.LtrRun
Application.Browser.Next
WordBasic.LtrRun
Application.Browser.Next
WordBasic.LtrRun
Application.Browser.Next
WordBasic.LtrRun
Application.Browser.Next
WordBasic.LtrRun
Application.Browser.Next
WordBasic.LtrRun
Application.Browser.Next
WordBasic.LtrRun
Application.Browser.Next
WordBasic.LtrRun
Application.Browser.Next
WordBasic.LtrRun
Application.Browser.Next
WordBasic.LtrRun
Application.Browser.Next
WordBasic.LtrRun
Application.Browser.Next
WordBasic.LtrRun
Application.Browser.Next
WordBasic.LtrRun
Application.Browser.Next
WordBasic.LtrRun
Application.Browser.Next
WordBasic.LtrRun
Application.Browser.Next
WordBasic.LtrRun
Application.Browser.Next
WordBasic.LtrRun
Application.Browser.Next
WordBasic.LtrRun
Application.Browser.Next
WordBasic.LtrRun
Application.Browser.Next
WordBasic.LtrRun
Application.Browser.Next
WordBasic.LtrRun
Application.Browser.Next
WordBasic.LtrRun
Application.Browser.Next
WordBasic.LtrRun
Application.Browser.Next
WordBasic.LtrRun
Application.Browser.Next
WordBasic.LtrRun
Application.Browser.Next
WordBasic.LtrRun
Application.Browser.Next
WordBasic.LtrRun
Application.Browser.Next
WordBasic.LtrRun
Application.Browser.Next
WordBasic.LtrRun
Application.Browser.Next
End Sub