charlie69 Posted March 10, 2009 at 09:44 AM Report Share #249594 Posted March 10, 2009 at 09:44 AM Boas é possível criar um timer (acho que é isso), que contabilize o tempo que quero... mas que permita durante a contagem clique num botão que eu quiser, e caso chegue ao fim do tempo, executa um determinado procedimento Obrigado Link to comment Share on other sites More sharing options...
jpaulino Posted March 10, 2009 at 10:35 AM Report Share #249603 Posted March 10, 2009 at 10:35 AM Vê este exemplo: Excel: Implementando um Temporizado (Timer) Link to comment Share on other sites More sharing options...
charlie69 Posted March 10, 2009 at 12:05 PM Author Report Share #249616 Posted March 10, 2009 at 12:05 PM é mais ou menos isso que quero. Agora queria que quando passasse um minuto desde que começou, ele parasse o relogio e disparasse uma sub.. é possível? Link to comment Share on other sites More sharing options...
Gooden Posted March 10, 2009 at 12:28 PM Report Share #249620 Posted March 10, 2009 at 12:28 PM num timer 1 segundo é igual a 1000. logo 1minuto=60 segundos=60000 Metes 60000 no intervalo e metes enable. dentro da função do timer chamas a funçao que queres disparar e aseguir meter timer1.enable=false capiche? =P Link to comment Share on other sites More sharing options...
jpaulino Posted March 10, 2009 at 12:37 PM Report Share #249623 Posted March 10, 2009 at 12:37 PM num timer 1 segundo é igual a 1000. logo 1minuto=60 segundos=60000 Metes 60000 no intervalo e metes enable. dentro da função do timer chamas a funçao que queres disparar e aseguir meter timer1.enable=false capiche? =P Isso em vb6, isto é vba 😛 Link to comment Share on other sites More sharing options...
joseA Posted March 12, 2009 at 10:38 PM Report Share #250425 Posted March 12, 2009 at 10:38 PM Olá, Acho que seria algo próximo, que vc necessita. Sub Time() 'aplica o time atual + 2 segundos para executar o procedimento Application.OnTime Now + TimeValue("00:00:02"), "ExecutarMacro" End Sub Sub ExecutarMacro() MsgBox "Atenção! Apague esta MsgBox e coloque seu procedimento. " End Sub Adapte a sua necessidade de tempo e no lugar da MsgBox substitua por Call sua macro. Abraços Link to comment Share on other sites More sharing options...
Recommended Posts
Create an account or sign in to comment
You need to be a member in order to leave a comment
Create an account
Sign up for a new account in our community. It's easy!
Register a new accountSign in
Already have an account? Sign in here.
Sign In Now