Executar una Consulta Automaticamente

Bom Dia Pessoal,

Eu gostaria executar uma consulta todos os dias em um determinado horário.

Alguém consegue me auxiliar em como fazer.

Desde já agradeço.

Bom dia! A única forma de fazer isso apenas com o Access é manter o aplicativo aberto sempre. E em um formulário, que também deve ser mantido aberto
por um time que execute a consulta na hora determinada.

Mas se fechar o formulário ou o app, já não funcionará.

Outra forma e através do agendador de tarefas do Windows. Poderá configurar um agendamento para executar seu sistema Access, que executará sua consulta. Poderá disparar a consulta usando a macro autoexec ou na abertura de alguma formulário que já abra automaticamente na inicialização.

A ideia do agendador de tarefas do Windows é ótima, mas acredito que não consigo fazer rodar kkkk.

Já a possibilidade de deixar o Access e o formulário aberto é possivel, coincidentemente eu executo esta consulta atraves do formulário.

A questão agora é como e aonde eu crio esta rotina para executar o formulário em um determinado horário.

Vamos supor que a consulta deve ser realizada todos os dias as 16 horas:
Em algum formulário que permaneça aberto, basta configurar o time para 1 minuto (60000).
Agora no evento Timer, ponha o código abaixo:

Código:

    On Error GoTo TrataErro

    'Verifico se é a hora de executar a consulta
    If Time = #4:00:00 PM# Then
        'Caso seja a hora de executar, desativo os avisos do Access (para consultas que manipulam registros)
        DoCmd.SetWarnings False
        'Executo a consulta
        'DoCmd.OpenQuery "NomeDaSuaConsulta", acViewNormal
        Me.lblInfo.Caption = "Executado às " & Time
        'Reativo os avisos do Access
        DoCmd.SetWarnings True
    End If

    Exit Sub
TrataErro:
    'Se ocorrer algum erro, garanto que os avisos sejam reativados
    DoCmd.SetWarnings True
    'Exibo detalhes do erro ocorrido
    MsgBox Err.Description, vbCritical, "Erro ao executar consulta: " & Err.Number

Bom Dia,

Mesmo com o formulário aberto, não executa.

Eu acredito que falta configurar a parte do time para 1 minuto (60000), este eu não entendi aonde deve ser feito.

Boa Tarde Marcelo,

Hoje testei novamente e agora apareceu um erro.

Consegue me dar mais um auxilio por favor.

Em anexo o erro.

O Erro indica que o rótulo lblInfo não existe em seu formulário.

Este rótulo eu apenas incluí para exibir a hora que ocorreu a execução. Pode remover do seu, caso não exista.
Remova essa linha se não for usar:

Me.lblInfo.Caption = "Executado às " & Time