Ler apenas primeira linha sem ler o arquivo texto inteiro

Primeiramente agradeço a todos os que já me ajudaram, pois mesmo sem eu perguntar já me utilizei dos vários conhecimentos abordados aqui.

Peço uma força no código abaixo, trata-se de uma validação, acontece que está muito lenta para arquivos grandes porque lê o arquivo inteiro.

Preciso ler APENAS a primeira linha para validar o arquivo.

Dim strLinha1 As String
Dim Tipo As String
Dim EspacoEmBranco As String

'Verifica se é Febraban V2

Open "C:\FEBRABAN\FEBRABAN.txt" For Input As #1 'lê o arquivo inteiro
Line Input #1, strLinha1
Close #1

Tipo = Mid(strLinha1, 1, 2)
EspacoEmBranco = Mid(strLinha1, 26, 11)

If (Tipo = "00" And EspacoEmBranco = " ") Then
DoCmd.RunMacro "ImportarV2" 'se verdadeiro roda uma macro
Else
MsgBox "O arquivo informado não é do layout Febraban V2!"
End If

Grato

Renato