ok, obrigado pela ajuda e tenha um otimo 2013 "Feliz aquele que transfere o que sabe e aprende o que ensina." Cora Coralina

segue o arquivo Cópia de Xl0000000.xls

testei a rotina e continua uma linha no fina do txt, achei que fosse uma falha na minha planilha então criei outra e refiz o teste no entanto deu na m...

desculpe a demora em responder coisas de final de semana, estou testando e retorno em breve

coisa do tipo : Range(Selection, Selection.End(xlToLeft)).Select Selection.Copy ou seria Selection.End(xlDown).Select alguma dica?

estive pensando o seguinte, teria como encaixar na rotina uma seleção apenas das celulas preenchidas e depois exportar apenas as selecionada?

não é a ultima preenchida, na verdade ela está vazia exclui as linhas indesejadas e continua o cursor na linha após os dados mesmo não tendo valores

o prompt parou na linha E65536

até ai tudo os dados foram exportados numa boa, no entanto observei que o prompt do notepad ficava abaixo da ultima linha, observei no anexo que vc po...

ok, valeu pelo esclarecimento aguardando ajuda!