Thread: Bolding in script
View Single Post
 
Old 02-19-2015, 09:54 PM
Guessed's Avatar
Guessed Guessed is offline Windows 7 32bit Office 2010 32bit
Expert
  
Join Date: Mar 2010
Location: Canberra/Melbourne Australia
Posts: 3,975
Guessed has a brilliant futureGuessed has a brilliant futureGuessed has a brilliant futureGuessed has a brilliant futureGuessed has a brilliant futureGuessed has a brilliant futureGuessed has a brilliant futureGuessed has a brilliant futureGuessed has a brilliant futureGuessed has a brilliant futureGuessed has a brilliant future
Default
Perhaps a macro like this would work if the styles were formatted correctly.
Code:
Dim oPar As Paragraph
  For Each oPar In ActiveDocument.Paragraphs
    If Left(oPar.Range.Text,2) = "A)" then
      oPar.Range.Style = "Normal Indent"
    Else
      oPar.Range.Style = "Normal"
    End if
  Next
__________________
Andrew Lockton
Chrysalis Design, Melbourne Australia
Reply With Quote