MaximoAccess

Caro Usuário, não tire as suas duvidas nas Salas de Repositório, abra sempre um novo tópico relacionado, nas salas destinadas para o efeito, como Sala de Tabelas, Consultas, Formulários, Relatórios, Macros, Módulos e VBA.

Obrigado

Administração do MaximoAccess

Dicas Ms Access, Exemplos Ms Access, Codigos VBA Ms Access, SQL Ms Access

    como executar uma macro a cada 5 segundos?

    Compartilhe

    volneigrams
    Novato
    Novato

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 4
    Registrado : 24/10/2015

    como executar uma macro a cada 5 segundos?

    Mensagem  volneigrams em Sab 24 Out 2015, 13:34

    Estou tentando fazer com que uma determinada macro seja executada a cada 5 segundos

    como fazer isso ?

    o código VBA que estou usando é este:

    Sub Auto_Open()
    Call TesteOnTime
    End Sub
    Sub ExecutaOnTime()
    '
    ' macro1 Macro ( se adicionada a um botão e executada, ela efetua o procedimento de atualização da minha tabala dinamica)
    '
    '
    ActiveWorkbook.RefreshAll
    End Sub

    Public Sub TesteOnTime()
    Call Application.OnTime(Now + TimeValue("00:00:05"), "ExecutaOnTime")
    End Sub

    já consegui fazer com que o arquivo depois de aberto execute a macro em 5 segundos, mas preciso fazer com que ela continue esse teste.

    Agradeço a ajuda.

    biligo
    Intermediário
    Intermediário

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 181
    Registrado : 10/04/2014

    Re: como executar uma macro a cada 5 segundos?

    Mensagem  biligo em Sab 24 Out 2015, 21:11

    Boas amigo,

    A questão é simples,
    Você vai precisar de um formulário que fique aberto todo o tempo em que sera efetuada essa chamada,
    No evento "No Timer" do seu formulário coloque o vba que deseja
    Abaixo deste terá "Intervalo do cronometro", coloque 5000 que equivale a 5s.
    Pronto já deve funcionar

      Data/hora atual: Sab 03 Dez 2016, 19:40