Нужен макрос разбивающий текст по заданным условиям

[ale1]

Нужен макрос разбивающий текст из столбца «B» в столбцы «B, C, D, E» из заданных условий:

В файле с примером 2 Листа, Лист 1 - исходный текст, Лист 2 - необходимый результат.

1.Условие, считаем количество заполненных ячеек в столбцах «F, G, H, I» исходя из полученных данных делим текст на части, равные количеству заполненных ячеек. На примере, в строке 2, длинна текста 2519 символов и 4 заполненных ячейки «F, G, H, I», значит делим текст на 4 равные части по следующему принципу, ¼ символов, далее доходим до первого пробела и переносим оставшийся текст в следующую ячейку.

2.Условие, максимальная длинна текста 1500 символов, поэтому доходим до 1450 символа далее до первого пробела и переносим оставшуюся часть текста в следующий столбец. Даже если у нас нет заполненных ячеек в столбцах «F, G, H, I»! При этом данные из этих ячеек необходимо дополнить скопировав из имеющихся ячеек, см. пример в 3 строке.

[sv2015]

кросс

http://www.excelworld.ru/forum/10-37607-1