title: Find String in Word and Bold Selection
body: <p><strong>CONTEXT</strong></p>
  
  <p>I have a word document that I would like to perform checks to make sure it fits a standardized format.  The document is filled with 1 line bullet points.  I want to parse through each line and check every word that matches the word "Testing" to make sure it is bold.</p>
  
  <p><strong>PROBLEM</strong></p>
  
  <p>I am able to parse through each line and check if the line contains the word but am not sure how to check if only the found selection is bold.</p>
  
  <p><strong>CURRENT CODE</strong></p>
  
  <pre><code>Sub checkWords()
  
  Dim singleLine As Paragraph      'bullet point document so just went by each paragraph
  Dim lineText As String
  Dim pos As Integer
  
    For Each singleLine In ActiveDocument.Paragraphs
      pos = InStr(singleLine, "Testing")
  
      If pos &lt;&gt; 0 Then
          MsgBox ("Testing InStr")
      End If
  
  
  'PSEUDOCODE
  'If singleLine.Range.Font.Bold &lt;&gt; True Then
  '   Do This
  'End If
  
  Next singleLine
  
  End Sub
  </code></pre>