Задание. Используя операции работы со строками составить максимальное количество слов из слова "Канатоходец".
Для решения задания надо брать символы из этого слова, менять их местами или удалять, чтобы получить другие слова.
Вот так можно получить слово "Канат":
Sub макрос()
Dim text As String
' Записываем текст в переменную.
text = "Канатоходец"
' Вывод результата в View - Immediate Window.
Debug.Print Left(text, 5)
End Sub