Замена символа(VBA)

[Mnsh]

Задача:
Ввести текст. Заменить в тексте букву «о» на «а»

[ViktorR]

1. Вводите текст - str.
2. Определяете длину - n = len(str)
2. Используете функцию поиска позиции символа 'о' - m = InStr(str,'o')
3. Формируете строку str = Left(str, m -1) + 'a' + Mid(str, m + 1, n - m)

Это только когда в строке одна буква 'o'.
Можно написать рекурсивную функцию, которая выполнит замену всех символов или использовать цикл с постусловием:
Do
' операторы

Loop While m < n ' пока не достигнут конец строки

Как то так ...