Macro para ler arquivo txt

[ronaldofas]

Gostaria de saber se alguém tem alguma macro para leitura sequencial de arquivo txt ou se possui algum material sobre esse assunto.

Agradeço.

[RonaldoElias]

Seria mais ou menos isso?

Function Nome()
	Dim iNumber as Integer
	Dim sLine, aFile, sMsg as String
		sMsg = ""
		aFile = "C:\Documentos\Teste.txt"
			If FileExists(aFile) Then
				iNumber = Freefile
				Open aFile For Input as iNumber
				While not eof(iNumber)
				Line Input #iNumber, sLine
					If (sLine <> "") Then
						sMsg = sMsg & sLine & " "
						'ou sMsg = sMsg & sLine & Chr(13)
						MsgBox sMsg
					End if
				Wend
				Close #iNumber
			Else
			End if
End Function

[ronaldofas]

Era exatamente isso, muito obrigado!

[ronaldofas]

Qual é o padrão que você utiliza para nomeação de variáveis? tem documentação?

[RonaldoElias]

Acesso o site: http://www.pitonyak.org