Выделение ячеек с текстом длиной более 19 символов

Используем макросы на VBA в Excel. Стоит задача найти все ячейки в которых есть запись длиной более 19 символов.

Записи находятся на листе 1 в диапазоне D2:D372. Так как первая строка заголовок то пропускаем и начинаем со второй строчки.

Sub Dlinalogin() ‘ Обьявляем макрос
For i = 1 To 372 ‘ Проходим по нашим строчкам

If Len(Cells(i, 4).Value) > 19 Then ‘ Если в ячейке значение больше 19

Cells(i, 4).Font.ColorIndex = 6 ‘ То подсветим текст в ячейке цветом (желтый)

End If

Next i ‘ Переходим к следующей строчке

End Sub