Prezados,
boa tarde!
Preciso de uma macro pra resolver meu problema.
Tenho uma planilha que contém dados, e eu preciso dos mesmo em um arquivo TXT.
Primeiramente eu fiz esta macro:
Sub GERAR()
'
' GERAR Macro
'
'
Sheets("IMP").Select
Sheets("IMP").Copy
ActiveWorkbook.SaveAs Filename:="C:\documentos\teste.prn", FileFormat:= _
xlTextPrinter, CreateBackup:=True
ActiveWindow.Close
End Sub
Só que este arquivo gerado não dá pra utilizar pois existem linhas que contém mais de 255 caracteres, e na hora de salvar o arquivo texto, ele seleciona somente os 255 caracteres.
Se alguém tiver uma solução pra este problema me informe por favor.
Uma solução que eu pensei seria criar uma macro para abrir o bloco de notas, copiar o conteúdo da planilha e colar no bloco de notas, e já salvar o arquivo. Assim desta forma as linhas que contém mais que 255 caracteres, aparecem por completo no arquivo de texto.
Obrigado