[Resolvido]Como gerar um Relatorio do Access para Excel com Filtro

Bom Tarde pessoal,
Mais uma vez estou aqui pedindo ajuda, bom ... A duvida de agora é a seguinte:

Tenho um banco de dados que é acessado por 5 a 7 clientes simultaneamente (Front-End e Back-End), estes usuario inserem informações de clientes 12 hrs por dia, no final do dia preciso gerar um relatorio com o filtro da data de cadastro e exporta-lo para Excel como a resposta de uma Query(consulta) traz. No caso,na tabela que recebe as informações existe um campo que recebe a data de cadastro.

Lembrando que é um sistema que só "leigos" de computação utilizam

Como posso fazer isto Via VBA ?

Crie uma macro para exportar o relatório e depois converta ela para vba e terá o código referente em um novo módulo.

Criquio, verifiquei toda a lista de macro e procurei algum jeito de fazer uma gravação de macro (igual a opção do excel), porem sem sucesso. Pode informar o nome da macro ou aonde posso encontrar o comando ?

Qual é a versão do Access? No 2007 você pode clicar na opção "Mostrar todas as ações" e depois, na lista, procurar por "TransferirPlanilha"

Criquio, verifiquei a informação e achei a função para exportar, porem não estou conseguindo fazer o Formulario exportar.
No caso, preciso executar uma consulta no campo "DATA" e apos este filtro preciso exportar este banco de dados.

Exemplo:

Na cosulta tenho

CAMPO : Nome DATA Endereço
TABELA: Prod Atendimento Prod Atendimento Prod Atendimento
Critério: Formulários![Relatorio_Geral]![DATA]

Com isto vai sair mais ou menos uns 200 registros.
Estes Registros eu preciso exportar para Excel.Porem, quero fazer isto atraves de um botão no formulario.
Já até tentei fazer assim:

Private Sub Exportar_Click()
On Error GoTo Exportar_Err

DoCmd.TransferSpreadsheet acExport, 10, "Teste", "Relatorio de Cadastro", True, ""

Exportar_Exit:
Exit Sub

Exportar_Err:
MsgBox Error$
Resume Exportar_Exit

End Sub

Mas dá um erro : " O mecanismo de banco de dados do Microsoft Office Access não pôde encontrar o objeto 'Teste'. Verifique se o objeto existe e se você digitou o nome do caminho corretamente."

Pode me ajudar?

Alguem pode me ajudar ?

A sua consulta tem o nome de Teste ??????

Exemplo basico;


Private Sub SeuBotão_Click()
DoCmd.TransferSpreadsheet acExport, 10, "SuaConsulta", "C:\SeuFicheiro.xls", False
End Sub

A princiopio ta começando a funcionar....

No caso inseri este modulo no botão

Porem qndo vou abrir o .xls ele só ta vindo o campo com nome dos campos. porem os cadastros não estão vindo.

Se a sua consulta devolver resultados, vão todos para o Excel, sim.

Se a sua consulta não devolver resultados, irão apenas os nomes dos campos.

Ela esta devolvendo resultados. No caso os resultados estão sendo exibidos em um formulario que chama a consulta.

E o botão está dentro deste formulario.

Como não houve retorno, o tópico passa a resolvido. Qualquer coisa reabra, por favor.