Изменить цвет определенных символов в ячейке

У меня есть предложение «Я хотел бы 50 из них, пожалуйста» в ячейке A1. Я хочу, чтобы любые числовые символы красного текста (только числовые символы). Как мне это сделать? Вот кадр того, что у меня есть ...

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

Любая помощь будет принята с благодарностью.

Ответы на вопрос(2)

Ваш ответ на вопрос