Excel VBA Planilha Shapes 15 relógio executar parar
Este Macro do Aplicativo Microsoft Excel VBA(Visual Basic Application), Saberexcel Macro insere em Shapes (Autoforma) — dispara relogio (DATA e Hora) Esse exemplo de planilha contém macros que monta um shapes(Autoforma) com a data e hora atual, porém a hora é incrementada a cada segundo, por meio de códigos em um macro e também um macro ligado botão para parar o relógio.
‘//==============’
Dim vTempo
Sub sbx_HORARELOGIO()
Saber1.Shapes(“sbxRELOGIO”).TextFrame.Characters.Text = “Agora: ” & Format(Now, “dd/mm/yy hh:mm:ss”)
vTempo = Now + TimeValue(“00:00:1”)
Application.OnTime vTempo, “sbx_HORARELOGIO”
End Sub
‘//==============’
Sub auto_close()
On Error Resume Next
Application.OnTime vTempo, Procedure:=”sbx_HORARELOGIO”, Schedule:=False
End Sub
‘//==============’
Sub sbx_PARARELOGIO()
On Error Resume Next
Application.OnTime vTempo, Procedure:=”sbx_HORARELOGIO”, Schedule:=False
End Sub
‘//==============’
Sub sbx_DISPARARELOGIO()
sbx_HORARELOGIO
End Sub
‘//==============’
Aprenda tudo sobre planilhas do Aplicativo Microsoft Excel VBA(Visual Basic Application), sozinho, com baixo custo, praticando com os produtos didáticos Escola SaberExcel VBA Estudos® – Treinamentos com Macros, Fórmulas e Funções.
Compre pelo PagSeguro | Compre pelo PayPal | |
Material Didático: Curso Excel VBA Expert |
Baixe o exemplo de planilha contendo os macros acima: |
Planilha Excel VBA Shapes 15 relogio executar parar |
<<Download Link: Verificar Caixa de Itens Excluídos também >> |
Planilha Excel VBA Shapes 15 relógio executar parar