Cita:
Iniciado por David el Grande 
Debe ser:
Código:
Open App.Path & "lineas.txt" For Input As #1
Pues yo no creo que deba ser asi, sino:
Open App.Path & "\lineas.txt" For Input As #1
Porque App.Path devuelve la ruta de la aplicación pero sin el splash final.
