title: Change color of certain characters in a cell
body: <p>I have the sentence "I would like 50 of those, please" in cell A1. I want to make any numeric characters red text (just the numeric characters). How do I do this? Here's the frame of what I have...</p>
  
  <pre><code>Sub RedText()
  
  Dim i As Integer
  
  For i = 1 To Len(Cells(1, 1).Value)
      If IsNumeric(Mid(Cells(1, 1).Value, i, 1)) = True Then
          'make the character red text
      End If
  Next
  
  End Sub
  </code></pre>
  
  <p>Any help would be greatly appreciated.</p>