[Resolvido]Executar Consulta de acordo com o Horário do Sistema

Boa noite!

Alguem conhece uma forma de executar uma consulta de acordo com o Horário do sistema?

Exemplo:
Todos os dias às 8h sem a intervenção do usuário, a macro é executada automaticamente?

Obrigado!

Faça assim...

No evento No Timer do seu Form vc deixa o código

Código:

If vba.time="08:00:00" then
  docmd.runquery "nomeSuaConsulta"
end if

não se esqueça de configurar o Intervalo do Cronômetro para 1000

Não tem segredo, de qualquer forma estou montando uma video aula justamente sobre isso e vou disponibilizar no Youtube...
Se você não conseguir implementar, dá um alo que eu passo o link

Abraços

Prezado LiveBrain!

Obrigado por seu retorno, farei os testes e lhe dou um feedback.

Você tem aulas no Youtube? Me passe qual o nome do canal.

Abraço!

Opa amigo, comecei tem um Mês com as aulas...

o link é:

Abraços

Live Brain,

3 coisas:

1) A solução que você passou está correta.

2) O seu canal no Youtube está de parabéns, a qualidade das aulas é muito boa. Você ganhou um seguidor.

3) Sobre a minha dúvida inicial, vou precisar de um complemento para a sua solução.
Eu tenho diversos arquivos access que rodam algumas consultas diárias e em determinados horários, e eu preciso além de executar as consultas no horário, acionar essas consultas sem ter que abrir o arquivo.
Você conhece alguma solução?

Se você exportar essas consultas para um arquivo Excel ajuda?

Boa tarde!

Como seria se exportar para o excel?

Tem duas formas para você fazer isso. Coloque os códigos abaixo depois da instrução que realiza sua consulta

Método 1: Exportar a consulta para um novo arquivo do Excel. Ele vai substituir o arquivo existente

Código:

DoCmd.OutputTo acOutputTable, "Nome da Sua Consulta", "ExcelWorkbook(*.xlsx)", "C:\... Endereço da Nova Planilha“, False, "", 0, acExportQualityPrint


Método 2: Exportar a consulta para um arquivo Excel que já existe. Vai criar uma planilha com o nome da consulta.

Código:

DoCmd.TransferSpreadsheet acImport, 10, "NomeDaSuaConsulta", "C:\...Endereço da Planilha Existente", True, ""

Bom dia!

Vou tentar adaptar suas dicas.
Muito obrigado pela força.

Vou fechar o tópico, caso haja necessidade reabro novamente.