Ищу решение

Пытаюсь программировать на VBA в Excel(т.е пока еще чайник). Наткнулась на интересную задачку и запуталась с кодом. Люди, Help!!! Вот задачка: Все буквы слова, в котором содержится не менее двух букв а, заменить на заглавные буквы.
5 ответов

Вот ваше решениеLen (функция) - возвращает число символов строки или число байт, необходимых для хранения переменнойUCase (функция) - возвращает строку, преобразованную в верхний регистр If...Then... Else (оператор) - выполнение групп команд в зависимости от значения выражения


или число байт, необходимых для хранения переменной
// LenB() .


и запуталась с кодом
Код в студию - поможем распутать. Вот только что-то подсказывает, что не сама ты "Наткнулась на интересную задачку", а тебя наткнули выдав задание.


Некоторые дополнения к коду по ссылке: 1. Не зависимо от установки Option Base, счет элементов в массиве, полученном с помощью оператора Split, будет начинаться с 0. Соответственно, чтобы не пропускалось первое слово в предложении, и цикл перебора нужно организовывать
For n=<b><font color="Red">0</font></b> To UBound(words)
2. Условие вхождения в текущее слово двух и более букв "а" мощно (проще) проверять так:
If LCase(words(n)) Like "*а*а*" Then words(n) = UCase(words(n))
P.S. Обратите внимание, что в примере ищем русскую букву "а".