VBA – Instrução Line Input

Written by

Mel Jenkins

Reviewed by

Steve Rynearson

Translated by

Daniel Caramello

Last updated on September 6, 2023

Line Input (Entrada de Linha) – Descrição

Lê uma única linha de um arquivo sequencial Open e a atribui a uma cadeia de caracteres.

Sintaxe de Line Input

Line Input #FileNumber, VarName

A instrução Line Input contém 2 argumentos:

FileNumber (número de arquivo): Qualquer número de arquivo válido

VarName (nome da variável): Nome válido de variável Variant ou String

Exemplos de Instrução Line Input do Excel VBA

Para testar a instrução Line Input, crie um arquivo de texto “teste.txt” na unidade D. (D:\teste.txt) Suponha que o conteúdo do arquivo seja o seguinte:

abc
1 2 3
xy z

Execute o código a seguir.

Sub LineInput_Exemplo()
    Dim strLinha As String
    Dim strConteudo As String
    
    Open "D:\teste.txt" For Input As #1 ' Abrir o arquivo.
    Do While Not EOF(1) ' Fazer loop até o final do arquivo.
       Line Input #1, strLinha ' Ler a linha na variável.
       strConteudo = strConteudo & strLinha
    Loop
    Close #1 ' Fechar o arquivo.
    
    MsgBox strConteudo
End Sub

Então, o resultado será o seguinte.

vba-free-addin

Exemplos de Add-ins de Códigos VBA

Acesse facilmente todos os exemplos de código que se encontram em nosso site.

Simply navigate to the menu, click, and the code will be inserted directly into your module. .xlam add-in.

(Nenhuma instalação necessária!)

Baixe de Graça

Retornar aos Exemplos de Códigos VBA