Este fórum está sendo desativado

Depois de 9 anos, este fórum será desativado. Mas calma.... estamos migrando para uma comunidade no DISCORD. Junte-se a nós.

ENTRAR PARA DISCORD

Tópicos relacionados a códigos VBA, gravação de macros, etc.
  • Avatar do usuário
  • Avatar do usuário
Por CleuberZago
Posts
#9106
Boa noite pessoal!

Seguinte, tenho uma pasta que possui algumas macros que são acionadas com ao clicar sobre um botão de "Clique aqui para atualizar" e gostaria de adapta-la para seja atualizada automaticamente a cada 5 minutos. Como se fosse uma macro para executar outra série de macros a cada 5 minutos...

Alguém consegue dar uma força?
Você não está autorizado a ver ou baixar esse anexo.
Avatar do usuário
Por Sandman
Posts Avatar
#9154
boa noite amigo, fiz uma planilha aqui e espero que sirva para vc adaptar para o seu problema, o código esta bem comentado, e eu coloquei ela pra mostrar uma mensagem a cada 10 segundos só pra vc verificar que esta funcionando, mas no seu caso é só vc modificar o intervalo de segundos pretendido no seu caso 5 minutos equivalem a 300 segundos, ahhh não se esqueça tb de colocar no evento open a chamada do timer e no evento close a parada do mesmo para liberar da memoria ok :mrgreen:
Código: Selecionar todos
Private Sub Workbook_Open()
    StartTimer
End Sub

Private Sub Workbook_BeforeClose(Cancel As Boolean)
    Call StopTimer
End Sub
enfim esta tudo isso na planilha em anexo, bem comentado ok :mrgreen:
abraço
Você não está autorizado a ver ou baixar esse anexo.
Por CleuberZago
Posts
#9155
PERFEITO!

Adaptei de acordo com o que precisava e o resultado foi o que queria... Porém só queria um auxilio seu se é possível adaptar essa rotina com variáveis...

Tenho duas guias ("FOLLOW E RECEBIMENTO" e "FOLLOW E FISCAL"), é possível inserir um comando IF para a macro que for executada automaticamente ao atingir o tempo que foi definido executar de acordo com a guia que está aberta?

Por exemplo,
Se estou na aba "FOLLOW E RECEBIMENTO", ele chama a macro "Atualizar_Follow_Recebimento"
Se estou na aba "FOLLOW E FISCAL" ele chama a macro "Atualizar_Follow_Fiscal"

Desde já, muito obrigado!
Avatar do usuário
Por Kledison
Avatar
#9157
Boa noite,

só um palpite, no VBA coloque dentro dos módulos das abas "FOLLOW E RECEBIMENTO" e "FOLLOW E FISCAL" o seguinte:
Código: Selecionar todos
Private Sub Worksheet_Activate()
StartTimer
End Sub

Private Sub Worksheet_Deactivate()
Call StopTimer
End Sub
Avatar do usuário
Por Kledison
Avatar
#9175
Bom dia,

Estou trancando o tópico pois o problema já foi resolvido, caso precise destranca-lo, entre em contato com os Moderadores/Administrador.

Att
long long title how many chars? lets see 123 ok more? yes 60

We have created lots of YouTube videos just so you can achieve [...]

Another post test yes yes yes or no, maybe ni? :-/

The best flat phpBB theme around. Period. Fine craftmanship and [...]

Do you need a super MOD? Well here it is. chew on this

All you need is right here. Content tag, SEO, listing, Pizza and spaghetti [...]

Lasagna on me this time ok? I got plenty of cash

this should be fantastic. but what about links,images, bbcodes etc etc? [...]

Estamos migrando para uma comunidade no Discord