[resolvido] Exportar Consulta via VBA com a data atual

Moderador: Avelino Sampaio

Sidney
Mensagens: 79
Registrado em: 20 Mai 2016, 18:47
Localização: Altamira_Pará

[resolvido] Exportar Consulta via VBA com a data atual

Mensagempor Sidney » 22 Nov 2017, 14:05

Prezados, Bom dia!!!

Montei o código abaixo para exportar uma consulta para excel, porém, não estou conseguindo fazer duas coisas;

1 - Usuário escolher o local a onde ele quer salvar.
2- Abrir o arquivo apos a exportação automaticamente.

código:

Código: Selecionar todos

DoCmd.OutputTo acOutputQuery, "QFAM_461", "Excel97-Excel2003Workbook(*.xls)", "C:\Users\sidney.silva\Desktop\" & "QFAM_461_C10" & "_" & Format(Now, "ddmmyy") & ".xls", False, "", 0, acExportQualityPrint


o código está exportando normalmente, como o nome do arquivo que eu quero e com a data do dia. Desde de já agradeço..

att;

Sidney
Sidney Carvalho

Disable adblock

Precisamos do seu apoio. Faca uma doacao para o site atraves do Paypal.


Avatar do usuário
Damasceno Jr.
Mensagens: 437
Registrado em: 08 Jun 2015, 01:30
Localização: Medicilândia-Pará

Re: Exportar Consulta via VBA com a data atual

Mensagempor Damasceno Jr. » 22 Nov 2017, 16:14

Tente
Código:
DoCmd.OutputTo acOutputQuery, "QFAM_461", "Excel97-Excel2003Workbook(*.xls)", , True, "", 0, acExportQualityPrint

Dessa forma o Access abrirá uma caixa para que o usuário escolha o local e o nome do arquivo a ser salvo.
Quanto mais o tempo passa, mais descubro e mais me apaixono por MS Access.

Sidney
Mensagens: 79
Registrado em: 20 Mai 2016, 18:47
Localização: Altamira_Pará

Re: Exportar Consulta via VBA com a data atual

Mensagempor Sidney » 22 Nov 2017, 17:45

Amigo, Boa tarde!!

Consegui resolver com algumas pequenas mudanças, segue abaixo:


Código: Selecionar todos

DoCmd.OutputTo acOutputQuery, "QFAM_461", "Excel97-Excel2003Workbook(*.xls)", "QFAM_461_C10" & "_" & Format(Now, "ddmmyy") & ".xls", True, "", , acExportQualityPrint


mesmo assim muito obrigado.

att;

Sidney
Sidney Carvalho

Disable adblock

Precisamos do seu apoio. Faca uma doacao para o site atraves do Paypal.



Voltar para “Módulos VBA”

Quem está online

Usuários neste fórum: Nenhum usuário registrado e 1 visitante