Друзья! Помогите разобраться - никак не могу перевести txt в excel. И копировать пробовала и тогда text to column, и через Data=>From Text обоими способами, но никак

Здравствуйте!
Очень (как и всем) нужна помощь. Есть складской приход-раход, который записывается в одну строку. Просто скопировать строку на другой лист макросом я уже понила как, но тут задача чтобы одна строка скопировалась бы дважды и по разному. Пример прикпеплён. С листе Анализ показала результат своей идеи.
P.S. Фирма с маленьким оборотом, но дорогим продуктом - пока что не доросли до складской программы, поэтому прошу Вашей помощи.

Zdarstvuyte!
Situacija - est' iznachal'naja cena. No posle 3 mesjacev ona menjaetca. A eschjo posle 3 opjat'. Kak sdelat' shto by pri pervom izmenenii, jachejka s iznachalnoj cenoj, zakrashivalas' by v odin cvet, pri vtorom - v drugoj.