Resolvido resultado = DateDiff("h", DataInicial, DataFinal)

Realmente Edson, era um problema de logica que gerava um loop eterno. Muito obrigado por abrir minha mente.. Obrigado a todos que ajudaram...

veja o codigo : a = CDate(Format(CDate(datanova), "Hh:Mm:ss")) datanova = 0 ' zera o calculo do tem...

Obrigado pela ajuda WAg, Sua ideia é criativa, porem tenho que testar se é ">" por isso preciso do valor numérico e a variável ora retor...

Resolvido com sua sugestão : "GetFromClipboard ". Obrigado.

o resultado sai em uma "label" , apenas para visualização, minha intenção é que estes dados apareçam como se estivesse navegando por um form...

Eu tb procurei algo assim e nao consegui. Uma solução que encontrei e funcionou muito bem foi inserir uma msgbox no momento que precisei da pausa A ...

exemplo: Quero mover um botão ou caixa de texto no formulário, não usarei o mouse e sim o teclado, desta forma consigo um ajuste fino. Obrigado.