Ayuda con macro de Generar TXT

Hola Buenos días de antemano Gracias por la ayuda Tengo 1 consulta.
Tengo mi Formulario De Generar TXT, tengo una validación la cual me falta.
El archivo debe contener un solo Trailer y debe estar en la última línea.(y después del trailer ya no debe de copiar nada y generar el TXT sin espacios en blanco.
Nota. Es importante validar que después del Trailer no se agregue ninguna línea más ni siquiera en blanco
(este es el problema que tengo cuando Genero el TXT al final me deja una linea en blanco y no se porque)
Estuve pensando un modo mas no se como hacerlo que al encontrar el Trailer o sus primeras 3 palabras(TRL) se pare y hasta hay copie y se generer el TXT pero no se como realizarlos.
O si alguien tiene un código que pueda probar se lo agradecería
Les dejo el archivo.
https://www.dropbox.com/s/sl1q2j2b1n8n7hg/GenerarTxt.zip
Gracias de antemano