Importar dados de uma tabela para excel

Boa noite!

Segue abaixo o código simplis que ajudar muito na hora de importar dados para uma planilha excell.

output to c:\temp\nome_arquivo.txt.
for each nome_tabela no-lock:

export delimiter ' ; ' nome_tabela.

end.
output close.

Pronto. É só abrir a planilha excell e cliclar no botão abrir ai seleciona o arquivo .txt salvo no c: \temp e escolha a opção delimitado e depois separado por ponto e virgula.

Bom dia,
Esse código ajuda muito, tenho uma versão retirado aqui do forum e incrementada. Essa versão coloca o nome de cada campo na primeira linha.

Código:

OUTPUT TO C:\TEMP\item-uf.csv.
FIND FIRST mgft._file WHERE mgft._file._file-name = "item-uf" NO-LOCK NO-ERROR.
FOR EACH mgft._field WHERE mgft._field._file-recid = recid(mgft._file) by mgft._field._Order:
    PUT UNFORMATTED mgft._field._field-name ";" .
END.

PUT UNFORMATTED SKIP .

FOR EACH item-uf:
    EXPORT DELIMITER ";" item-uf.
END.
OUTPUT CLOSE.