Как отделить строчные буквы от прописных пробелом?

[Exc_fun]

Имеется текст, в котором рандомно (вразброску) расположены слова, где строчные буквы слиплись с прописными. Нужно, к примеру, чтоб ЕвгенийЛеонов стало Евгений Леонов, a СавелийКрамаров стало Савелий Крамаров. Какой скрипт решает поставленную задачу?

[kuklp]

Имеется текст, ...

Не верю. Где пример? Читаем правила.

[Exc_fun]

Пример я же привел. Задача нерешаемая что-ли?

[NooBasTiK]

2. К первому сообщению темы должен быть прикреплен файл примера в формате xls*.
Приложив пример, Вы избавите себя и других от вопросов типа "А какой критерий?", "А куда выводить результат?", "А сколько строк?" и все тех же просьб выложить файл. Рисовать за Вас Ваши же таблички с заданиями, а затем и решение к ним, никто желанием не горит. Да и, как показывает практика, в большинстве случаев без файла решения не найти.
Прикрепить к сообщению можно только файлы gif,jpg,rar,zip,7z,bas,frm,cls,docx,xlsx,xls размером до 1000 Кб.
Прикрепить файл можно в полной форме ответа на сообщение. Под окном для ввода сообщения нажмите на знак "+" возле текста "Дополнительные опции..."

[cheshiki1]

вариант для одной ячейки. выделяете одну ячейку и запускаете макрос.

Код Выделить Развернуть

Sub vvv()
Dim t$, i%
t = Selection
For i = 1 To Len(t) - 1
If Mid(t, i, 1) <> UCase(Mid(t, i, 1)) And Mid(t, i + 1, 1) = UCase(Mid(t, i + 1, 1)) Then
t = Mid(t, 1, i) & " " & Mid(t, i + 1, 999)
End If
Next
Selection = Application.Trim(t)
End Sub

[Exc_fun]

Куда вписать макрос? Вложение вставить не могу так как выскакивает ошибка:
"Извините! Уже существует вложение с таким же именем файла, как у загружаемого. Пожалуйста, переименуйте файл и повторите попытку."

Я переименовываю файл, но это не помогает. Ну напишите в столбце А Excel-я так:
СавелиКрамаров
ЕвгенийЛеонов
ВладимирИльчЛенин
ВладимирВысоцкий
АллаПугачева

[cheshiki1]

вот смотрите.

[Exc_fun]

Благодарю, все хорошо. А где формула? Я ее хочу знать, чтобы вставлять в другие таблицы. Они, как правило, у меня большие (по несколько десятков тысяч имен) и копировать столбцы в эту создаст путанницу.

[cheshiki1]

там не формула а макрос. alt+F11

[kuklp]

Exc_fun, повторяю, читайте Правила!  Тему закрываю.