Timer no VBA

[frata]

Bom dia, galera!!!

Preciso colocar um Timer num formulário VBA para ele abrir por um período de 2 segundos. Em VB é muito fácil criar isso, mas descobri que o VBA não tem o Timer. Será que dá para criar isso com um código?? Obrigado!!

[Alyson Ronnan Martins]

Tenta usar o seguinte comando:

Declare: 

'Habilita o Sleep na aplicação
#If VBA7 Then
    Public Declare PtrSafe Sub Sleep Lib "kernel32" (ByVal dwMilliseconds As Long)
#Else
    Public Declare Sub Sleep Lib "kernel32" (ByVal dwMilliseconds As Long)
#End If

Depois use o comando Sleep:

Public Sub MensagemTexto()
'Mensagem que vai esperar 2 segundos
Sleep 2000
MsgBox "Teste"
End Sub