ViiSanches

Movi teu tópico para formulários e excluí o tópico duplicado que vc criou.

Quando desejar que o tópico seja movido, basta enviar uma MP para um dos moderadores, conforme as regras do fórum e proibido criar mais de um tópico sobre o mesmo assunto.

Para evitar contra tempos e facilitar tua participação no fórum, leia as instruções dos links abaixo:

viewtopic.php?f=7&t=203
viewtopic.php?f=7&t=7903
viewtopic.php?f=7&t=3841
viewtopic.php?f=7&t=16757
viewtopic.php?f=7&t=12600
viewtopic.php?f=7&t=3371

[]s

Patropi - Moderador

Boa Tarde!

Tenho um programa feito em VBA, onde tenho um Módulo que mostra a hora no formulário, porém quando eu coloco no Módulo para mostrar a hora em outro formulário ele só mostra a hora no formulário que abrir primeiro e quando abro o outro formulário ele não mostra a hora.

Gostaria de saber como faço para mostrar a hora nos dois formulários.
Grato.

Módulo:

Option Explicit
Dim T

Sub StopTimer()
On Error Resume Next
Application.OnTime T, Procedure:="Update", Schedule:=False
End Sub

Sub StartTimer()
T = Now + TimeValue("00:00:01")
Application.OnTime T, "Update"
End Sub

Sub Update()
frmMenu.txtHora.Caption = Format(Now, "hh:mm:ss")
frmMenuAdministrador.textHora.Caption = Format(Now, "hh:mm:ss")
Call StartTimer
End Sub

Amigo bom dia, tente mudar o procedimento do módulo de sub para Public Sub e dentro do textbox ao qual queira chamá-lo tente utilizar a função Call nome_do_modulo ou mesmo também tente usar a instrução para que quando o UserForm for inicializado (Initialize) chamar esse mesmo procedimento, fica ai a dica blz.