Необходимо дописать макрос, который разделяет фразу на столбики по условию

[serg1992]

Доброго времени суток!

Есть макрос, который пилит фразу на столбики. В одном столбике получается 33 символа (учитывая и пробелы), в другом - всё остальное.
Макрос собирал из разных форумов, кое-как получился )

Появилась мысль чуток его допилить. В прикреплённом файле две проблемы разобраны:
1. Если текста меньше, чем 33 символа, то в один столбик фраза не выписывается, а выписываются в оба столбика #ЗНАЧ!. Хотелось бы, чтобы фраза выписывалась в 1 столбик, а во втором было просто пусто. РЕШЕНО!
2. Фраза делится на столбики, если в первом столбике последнее слово состоит из 3 и менее символов (предлоги обычно) - оно тоже переносится во второй столбик.
3. Ещё оказывается с английскими буквами не в ладах... Тоже поправить было бы хорошо. РЕШЕНО!
4. (не беспокоит, но для достижения идеала) - это когда ничего нет вообще и пишется #ЗНАЧ! в обоих столбиках. Пустота должна быть. РЕШЕНО!

Спасибо!

[IgorGO]

см. вложение

[serg1992]

Сообщение от IgorGO

см. вложение

СПАСИБО БОЛЬШУЩЕЕ!

3 из 4 решено )

[AlexM12]

Еще вариант функций

Function uuu1$(t$)
    Dim i&: i = 33
    uuu1 = IIf(Len(t) > i, Left(Left(t, i), InStrRev(Left(t, i), " ") + (Len(t) > 0)), t)
End Function

Function uuu2$(t$)
uuu2 = Trim(Replace(t, uuu1(t), ""))
End Function

и формул

=ЛЕВБ(B11;ПРОСМОТР(33;ПОИСК("? ";B11&" ";СТРОКА($1:33))))
=СЖПРОБЕЛЫ(ПОДСТАВИТЬ(B11;C11;))

[serg1992]

Сообщение от AlexM12

Еще вариант функций

Спасибо )

Подскажите, а этот вопрос - это уже дикость? Невозможно так сделать формулами?

2. Фраза делится на столбики, если в первом столбике последнее слово состоит из 3 и менее символов (предлоги обычно) - оно тоже переносится во второй столбик.

[AlexM12]

В два этапа для первой части фразы. формула первого этапа, второго.

=ЛЕВБ(B2;ПРОСМОТР(33;ПОИСК("? ";B2&" ";СТРОКА($1:$33))))
=ЛЕВБ(B2;ПРОСМОТР(33;ПОИСК("? ";B2&" ";СТРОКА($1:$33)))-СУММ(НАИБОЛЬШИЙ(ЕСЛИ(ЕЧИСЛО(ПОИСК("? ";C2&" ";СТРОКА($1:$33)));ПОИСК("? ";C2&" ";СТРОКА($1:$33)));{1;5})*{1;-1}))

Формула для второй части фразы

=СЖПРОБЕЛЫ(ПОДСТАВИТЬ(B2;D2;))

[serg1992]

Сообщение от AlexM12

В два этапа для первой части фразы. формула первого этапа, второго.

Спасибо, Алексей М . Очень помогли.