Vídeo recomendado
https://youtu.be/diWPPPhW-9E

Espaço em branco no final arquivo .txt

Fórum para dúvidas sobre os fundamentos da linguagem de programação Visual Basic no contexto do VBA
Tov Elen Shau
Manda bem
Manda bem
Mensagens: 173
Registrado em: Qua Mai 17, 2017 2:27 pm

Espaço em branco no final arquivo .txt

Mensagem por Tov Elen Shau »

Colegas

Boa tarde


Tenho uma planilha que gera um arquivo em txt para ser importando por um programa. Se eu copiar os dados da planilha e colar em um arquivo txt ele importa normalmente, mas quando a planilha salva automaticamente o arquivo em txt as linhas ficam com um espaço em branco no final de cada linha (mas dentro das células não tem espaço em branco no final) e daí o programa não importa. Alguém tem uma dica de como excluir esses espaços em branco ao gerar o arquivo?

Grato

Tov Elen Shau


Disable adblock

This site is supported by ads and donations.
If you see this text you are blocking our ads.
Please consider a Donation to support the site.


Avatar do usuário
Reinaldo
Jedi
Jedi
Mensagens: 1537
Registrado em: Sex Ago 01, 2014 4:09 pm
Localização: Garça - SP / SCS - SP

Re: Espaço em branco no final arquivo .txt

Mensagem por Reinaldo »

Como esse txt e gerado. Pode dispor um modelo/exemplo e maiores detalhes


Tov Elen Shau
Manda bem
Manda bem
Mensagens: 173
Registrado em: Qua Mai 17, 2017 2:27 pm

Re: Espaço em branco no final arquivo .txt

Mensagem por Tov Elen Shau »

Reinaldo, obrigado por se dispor a ajudar. Olha só, eu estava usando um código bem complexo e que não me ajudou muito. Resolvi adaptar a rotina abaixo e selecionou o problema.

Open "C:\Lançamentos\Lançamento.txt" For Output As 1
Range("A1").Select
Do While ActiveCell.Value <> ""
Print #1, ActiveCell.Value
Loop
MsgBox "Concluído com sucesso!"
Close 1

Muito obrigado a todos.


Tov Elen Shau


Disable adblock

This site is supported by ads and donations.
If you see this text you are blocking our ads.
Please consider a Donation to support the site.


Responder