necesito leer un texto por lineas

[potypoty]

Con este código leerás cada línea.

Dim archivo As String
Dim Linea As String

archivo = App.Path + "nombre.txt"

Open archivo For Input As #1
Line Input #1, Linea

' trabajas con la línea en cuestión'

Close #1

Si quieres trabajar con todas las líneas al final tendrás que guardar cada línea en un array.

Un saludo