Thread: [Solved] Need Help with Below Code
View Single Post
 
Old 03-29-2014, 01:55 PM
macropod's Avatar
macropod macropod is offline Windows 7 32bit Office 2010 32bit
Administrator
 
Join Date: Dec 2010
Location: Canberra, Australia
Posts: 22,467
macropod has a reputation beyond reputemacropod has a reputation beyond reputemacropod has a reputation beyond reputemacropod has a reputation beyond reputemacropod has a reputation beyond reputemacropod has a reputation beyond reputemacropod has a reputation beyond reputemacropod has a reputation beyond reputemacropod has a reputation beyond reputemacropod has a reputation beyond reputemacropod has a reputation beyond repute
Default

You don't need a macro. You can use a wildcard Find/Replace, where:
Find = ([!1-9])[0]{1,}([0-9]{1,})
Replace = \1\2
Of course, you could encode that in a macro like the one I provided yesterday.
__________________
Cheers,
Paul Edstein
[Fmr MS MVP - Word]
Reply With Quote