title: change first 3 characters to bold format
body: <p>How do I change the first 3 characters and &quot;CLEARANCE&quot; Font to BOLD of cells containing &quot;T##-&quot; and loop it until the last row of STANDARD and NON-STANDARD tables</p>
  <pre><code>Sub Formatting()
  
      Dim StartCell As Range
      Set StartCell = Range(&quot;A15&quot;)
      Dim myList As Range
  
      Set myList = Range(&quot;A15:A&quot; &amp; Range(&quot;A&quot; &amp; Rows.Count).End(xlUp).Row)
      Dim x As Range
  
      For Each x In myList
          'myList.ClearFormats
          x.Font.Bold = False
          If InStr(1, x.Text, &quot;CLEARANCE&quot;) &gt; 0 Or InStr(1, x.Text, &quot;clearance&quot;) &gt; 0 Then
              x.Font.Bold = True
          Else
              x.Font.Bold = False
          End If
      Next
      
          For Each x In myList
          'myList.ClearFormats
          x.Font.Bold = False
          If InStr(1, x.Text, &quot;T*&quot;) &gt; 0 Then
              x.Font.Bold = True
          Else
              x.Font.Bold = False
          End If
      Next
  
  End Sub
  </code></pre>
  <p>ORIG
  <a href="https://i.stack.imgur.com/d3BYE.png" rel="nofollow noreferrer"><img src="https://i.stack.imgur.com/d3BYE.png" alt="enter image description here" /></a></p>
  <p>FORMATTED
  <a href="https://i.stack.imgur.com/naTDb.png" rel="nofollow noreferrer"><img src="https://i.stack.imgur.com/naTDb.png" alt="enter image description here" /></a></p>