Thread: Search a cell that contains words and numbers and convert the numbers to metric
View Single Post
 
Old 10-08-2014, 01:42 PM
macropod's Avatar
macropod macropod is offline Windows 7 64bit 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
To omit the ^ symbols, you could change:
Code:
        .Characters(Start:=j, Length:=k).Font.Superscript = True
        j = j + k
to:
Code:
        .Characters(Start:=j, Length:=k).Font.Superscript = True
        .Characters(j, 1).Delete
        j = j + k - 1
__________________
Cheers,
Paul Edstein
[Fmr MS MVP - Word]
Reply With Quote