Fóruns
Microsoft Excel - 2...
Datas & Horas
relogio automatico
 
Notifications
Clear all

relogio automatico

 
Datas & Horas
2 Posts
2 Usuários
0 Reactions
1,538 Visualizações
RSS
 Danilson Vitor
(@danilson-vitor)
Posts: 34
Trusted Member
Topic starter
 

bom dia selhores

preciso saber como eu posso colocar um relogio com vida propria dentro de uma celula

ex
celula (A1)
09:00:05

esse relogio deve ser basialdo no relogio do computador e mude segundo a segundos na propria planilha

objetivo disso e criar um tipo de alerta quando o relorgio acima estiver entre 10:00:00 à 10:30:00 ele mude de cor.
sem mais obrigado a todos do forum

 
Postado : 06/03/2013 8:13 am
 Fernando Fernandes
(@fernandofernandes)
Posts: 43750
Illustrious Member
 

Temos varios post que tratam do assunto:
viewtopic.php?f=10&t=2617 ou viewtopic.php?f=10&t=2617 entre varios outros
O codigo abaixo "coloca" um time na celula A10 da planilha 1

Dim aHora As Date
Sub Tempo()
Sheets("Plan1").Range("A10").Value = Format(Time, "hh:mm:ss")
Horario
End Sub

Sub Horario()
aHora = Now + TimeValue("00:00:01")
Application.OnTime aHora, "Tempo"
End Sub

Sub Parada()
Application.OnTime EarliestTime:=aHora, Procedure:="Tempo", Schedule:=False
End Sub
 
Postado : 06/03/2013 9:08 am
Forum Jump:
  Tópico Anterior
Próximo Tópico