Ayuda, Macro Ordenar datos de un Txt

Buenas Tardes Grupo, necesito la ayuda para organizar un archivo txt, tengo una macro la cual en idas pasados me ayudaron a realizarla y pues funciona, pero si la ejecuto para otro archivo lo separa pero no como lo necesito y pues no se si alguien me pueda ayudar poniendo comentarios a la macro que ya tengo para entender el código o si tienen otra opción se los agradezco, para que me logren entender esta macro separa inventarios, pero si la utilizo para separar ventas no me sirve por que me corta la información.

Gracias. 

MAcro Extraer.rar