Como Importar um Arquivo Txt para o Excel

Existem várias maneiras de importar um arquivo TXT para o Excel, aqui estão algumas opções:

Opção 1: Importar arquivo TXT usando o Assistente de Importação de Texto

1. Abra o Excel e clique em "Dados" na barra de menu superior.
2. Selecione "Do Texto" no menu suspenso.
3. Na janela do Assistente de Importação de Texto, selecione o arquivo TXT que deseja importar e clique em "Importar".
4. Na próxima janela, selecione o separador de dados que seu arquivo usa.
5. Clique em "Avançar" e selecione como os dados devem ser tratados (por exemplo, como texto, número, data, etc.).
6. Clique em "Concluir" para concluir a importação.

Opção 2: Importar arquivo TXT usando o Power Query

1. Abra o Excel e clique em "Dados" na barra de menu superior.
2. Selecione "Obter Dados" e, em seguida, "Do Arquivo" no menu suspenso.
3. Na janela do "Navigator", selecione o arquivo TXT que deseja importar e clique em "Editar".
4. Na próxima janela, clique em "Dividir Coluna" para dividir os dados em colunas separadas, se necessário.
5. Clique em "Usar primeira linha como cabeçalhos de tabela" se você tiver uma linha de cabeçalho em seu arquivo TXT.
6. Clique em "Fechar e Carregar" para importar os dados para o Excel.

Opção 3: Importar arquivo TXT usando o VBA

1. Abra o Excel e pressione ALT + F11 para abrir o Editor do Visual Basic.
2. Insira o seguinte código no editor:

``` Sub ImportTxtFile() Dim myFile As String, text As String, textline As String, delim As String Dim rowNum As Integer, colNum As Integer

myFile = Application.GetOpenFilename()

If myFile <> "False" ThenOpen myFile For Input As #1rowNum = 1While Not EOF(1) Line Input #1, textline colNum = 1 For Each text In Split(textline, delim) Cells(rowNum, colNum).Value = text colNum = colNum + 1 Next text rowNum = rowNum + 1WendClose #1 End If End Sub ```

3. Altere o valor do "delim" de acordo com o tipo de separador usado em seu arquivo TXT (por exemplo, se for uma tabulação, use vbTab).
4. Salve o arquivo como um arquivo de macro habilitado (.xlsm).
5. Clique em "Desenvolvedor" na barra de menu superior e selecione "Macros".
6. Selecione a macro "ImportTxtFile" e clique em "Executar" para importar o arquivo TXT para o Excel.