[Resolvido]Abrir a tela de exportação em que ao clicar no botão aparecerá Exportar Veículos em Txt , exportar Peças em XML, Exportar Clientes em HTML

Olá, pessoal.

Criei um botão pra abrir a tela de exportação e aparecer :

1. Exportar Veículos em Txt
2. Exportar Peças em XML
3. Exportar Clientes em HTML

Fui nas macros, selecionei a macro ImportarExportarTexto pra ver se dá certo, mas tenho problemas com a opção "Nome da especificação" que tem lá.

Alguém sabe?

obrigado.

Já pensou em tentar por vba? No clique de um botão:

Código:

    DoCmd.OutputTo acOutputTable, "Veículos", "MS-DOSText(*.txt)", "C:\tblCclientes.txt", False, "", 0, acExportQualityPrint
    DoCmd.OutputTo acOutputTable, "Peças", "MS-DOSText(*.txt)", "C:\tblClientes.xml", False, "", 0, acExportQualityPrint
    DoCmd.OutputTo acOutputTable, "Clientes", "HTML(*.html)", "C:\tblClientes.html", False, "", 0, acExportQualityPrint

    MsgBox "Tabelas exportadas com sucesso", vbInformation, "Sucesso"

Obrigado, eu conseguí exportar. Mas não tem como abrir a tela de exportação não? A partir de lá eu iria escolher.

Obrigado.

Que tela de exportação? É um formulário que você criou? E quer escolher a tabela, o formato ou ambos? Exemplifique por gentileza.

Eu estava realmente voando mesmo.

Me pediram para eu criar isso, mas agora eu ví que tenho que criar um formulário com os botões certinhos.

Obrigado pelo código de exportação, apesar de eu não saber como chegar nesse OutputTo por macro, fica como VBA mesmo.

Resolvido.

EDIT: O arquivo XML fica como se fosse corrompido, quando vou importar o arquivo XML no excel ele sai errado.

Sabe o que é? :S

Sabe dizer por que o arquivo de XML vem corrompido?

Obrigado.

Tente mudando a linha do xml para:

Código:

Application.ExportXML ObjectType:=acExportTable, DataSource:="Peças", DataTarget:="C:\tblClientes.xml", AdditionalData:=objOrderInfo

Obrigado.

Desculpa a demora.

Faltou clicar no botão Resolvido. Dessa vez eu clico.