Hola, tengo una aplicacion la cual debe abrir un archivo txt y guardar la unformacion en un arreglo para despues validar infromacion en el arreglo.

Mi problema es que los archivos suelesn ser muy grandes y necesito solo algunas lineas del archivo como por ejemplo los que empiezen con XXXX, por lo que mi pregunta es: se puede validar informacion desde el archivo antes de almacenarlo en un arrelgo?
El codigo que estoy usando es

Dim f As Integer
f = FreeFile

Open "Ruta" For Input As f
Do While Not EOF(f)
ReDim Preserve Y(i)
Line Input #f, Y(i)
i = i + 1
Loop
Close f

lo que yo necesito seria un:
If "Caracteres dentro de la linea del archivo" = "XXXX" then line input #f,Y(i)

Pero no se como hacerlo.
Saludos!