none
Excel - VBA - Lendo arquivo ASCII RRS feed

  • Pergunta

  •  

    Pessoal, estou precisando da ajuda de vocês, preciso criar um programinha que leia um arquivo ASCII(ou txt comum) a partir de um parâmetro, e cole em uma célula no Excel, por exemplo, terei uma planilha em Excel com as posições de cada informação que precisarei copiar do arquivo texto para uma planilha em Excel, por favor, se puderem sugerir uma maneira de fazer isto fico grato,

     

    Abraço. 

    quinta-feira, 24 de janeiro de 2008 02:50

Respostas

  • Precisaria de detalhes adicionais para auxiliá-lo melhor.

    Seguem algumas considerações:

    1. Como está estruturado o arquivo texto? O Excel pode importá-lo de diversas formas, mas isso depende da organização do arquivo e formato desejado para as informações na planilha. Segue abaixo, um exemplo de código para importação de um arquivo separado por tabulações:

    Code Snippet

    Sub Importar()

    Workbooks.OpenText Filename:= _
            "C:\User\Teste.txt", _
            Origin:=xlWindows, StartRow:=1, DataType:=xlDelimited, _
            TextQualifier:=xlDoubleQuote, ConsecutiveDelimiter:=False, Tab:=True, _
            FieldInfo:=Array(Array(1, 1), _
            Array(2, 1), Array(3, 1), Array(4, 1), Array(5, 1), Array(6, 1), Array(7, 1), Array(8, 1), _
            Array(9, 1), Array(10, 1), Array(11, 1), Array(12, 1), Array(13, 1), Array(14, 1)), _
            TrailingMinusNumbers:=True

    End Sub

     

    Vc pode observar que além de estabelecer o separador (Tab:=True) vários outros parâmetros também devem ser informados e estes dependem dos pontos que questionei.

    2. Como quer dispor as informações nas células da planilha? Uma vez importadas as informações do arquivo txt é necessário fazer o endereçamento para as células desejadas. Para isto pode ser necessário alguns ajustes no arquivo importado, via VBA ou através de fórmulas.

     

    Se vc puder enviar mais informações, ou um exemplo do arquivo txt e da planilha desejada, poderei orientá-lo melhor.

    []s

     

    quinta-feira, 24 de janeiro de 2008 10:33