Fóruns
Microsoft Excel - 2...
2024 - VBA & Macros
Utilizar milésimo d...
 
Notifications
Clear all

Utilizar milésimo de segundo como referência

 
2024 - VBA & Macros
Post Recente por carlosrgs 7 anos atrás
8 Posts
3 Usuários
0 Reactions
1,849 Visualizações
RSS
carlosrgs
 carlosrgs
(@carlosrgs)
Posts: 631
Prominent Member
Topic starter
 

Bom dia.

Estava respondendo o tópico http://www.planilhando.com.br/forum/viewtopic.php?f=5&t=25664&p=128987#p128987
Onde coloquei no arquivo uma Macro que atualiza a cada 00:00:01

É possível trabalhar com intervalo menor no VBA ?

Gostaria de trabalhar com 00:00:00:50
Obrigado!

_______________________________________________________________________________________________
Carlos Santos
* Marque o tópico como Resolvido se foi solucionado seu problema.

 
Postado : 28/08/2017 8:22 am
Wagner Morel
 Wagner Morel
(@wagner-morel-vidal-nobre)
Posts: 0
Illustrious Member
 

carlosrgs,

Bom dia!

Até onde sei... o VBA não trabalha com horas abaixo de 1 segundo.

Desenvolvo pequenas soluções em VBA Excel a valores que variam entre R$ 50,00 a R$ 200,00. Se te interessar, entre no meu instagran (vba_excel_desenvolvimento)

Atenciosamente
Wagner Morel

 
Postado : 28/08/2017 8:29 am
 skulden
(@skulden)
Posts: 170
Estimable Member
 

Quando eu precisei, fiz no modo gambiarra. Deu certo.

Trecho do meu código:

Application.Wait (Now + 0.001)

Se a resposta lhe foi útil, clique no joinha!

 
Postado : 28/08/2017 12:23 pm
carlosrgs
 carlosrgs
(@carlosrgs)
Posts: 631
Prominent Member
Topic starter
 

Funfou não rs.

Mas valeu!

_______________________________________________________________________________________________
Carlos Santos
* Marque o tópico como Resolvido se foi solucionado seu problema.

 
Postado : 29/08/2017 5:06 am
 skulden
(@skulden)
Posts: 170
Estimable Member
 

Como você adaptou a linha no código?

Se a resposta lhe foi útil, clique no joinha!

 
Postado : 29/08/2017 6:20 am
carlosrgs
 carlosrgs
(@carlosrgs)
Posts: 631
Prominent Member
Topic starter
 

Fiz certo ?

Alterar esse:

Application.OnTime Now + TimeValue("00:00:01"), "Atualizando"

Por esse ?

Application.Wait (Now + 0.001)

Ficou mais rapido com esse:

Application.OnTime Now + TimeValue("00:00:01") - 1, "Atualizando"
Application.OnTime Now + TimeValue("00:00:01") - 0.001, "Atualizando"

Em ambos não deu muita diferença, mas ficou mais rapido!

_______________________________________________________________________________________________
Carlos Santos
* Marque o tópico como Resolvido se foi solucionado seu problema.

 
Postado : 29/08/2017 7:27 am
 skulden
(@skulden)
Posts: 170
Estimable Member
 

É que quando você usa o Wait, você manda ele executar o comando e após isso, esperar um certo tempo para depois executar novamente, usando o OnTime ele vai executar segundo à segundo, sem aguardar.

Mas está funcionando?

Abs.

Se a resposta lhe foi útil, clique no joinha!

 
Postado : 29/08/2017 12:59 pm
carlosrgs
 carlosrgs
(@carlosrgs)
Posts: 631
Prominent Member
Topic starter
 

Funcionou, mas ficou tão rápido que não tem como desativar clicando no botão parar kkkk
Mas ta bom, conforme comentei era a resolução de um tópico de outro usuário.

_______________________________________________________________________________________________
Carlos Santos
* Marque o tópico como Resolvido se foi solucionado seu problema.

 
Postado : 30/08/2017 7:03 am
Forum Jump:
  Tópico Anterior
Próximo Tópico