Tutorial – Como inserir relógio em tempo real em planilha no Excel 2010

por | |

Veja aqui como inserir um relógio que atualiza em tempo real em uma planilha do Excel.

Código mostrado no vídeo:

‘ ‘ ‘ ‘ ‘ ‘ ‘ inicio código

Dim Go As Boolean

Sub IniciaRelogio()
Go = True
MeuRelogio
End Sub

Sub MeuRelogio()
If Go Then
ActiveSheet.Calculate
Application.OnTime Now() + TimeValue(“00:00:01”), “MeuRelogio”
End If
End Sub

Sub ParaRelogio()
Go = False
End Sub

‘ ‘ ‘ ‘ ‘ ‘ ‘ ‘ ‘ ‘ fim código

Você também vai gostar de ver:

Adicionar aos favoritos o Link permanente.

Sobre Viny

Formado em Sistemas de Informação. Curte praticamente tudo o que é relacionado ao mundo geek/nerd: música, quadrinhos, livros, mangás, animes, games, seriados, filmes, gadgets e tecnologia em geral. Teve vários trabalhos muito distintos (ou nada a ver um com o outro, se preferir ;P), desde vendedor de picolé, entregador de panfletos, auxiliar de produção e caixa de lan house. Sempre teve interesse em tecnologia, até que teve uma oportunidade para trabalhar mais próximo da área: Trabalhou 8 anos como escrav.. ops, como técnico de informática, ouvindo muitas asneiras dos "users" e resolvendo desde problemas "simples" como a recuperação de dados valiosíssimos de um HD queimado ou implantação de redes e servidores até problemas "incrivelmente complexos" como o misterioso caso de um micro que não queria ligar de jeito nenhum (esqueceram de avisar o cliente que o micro só liga se estiver na tomada!) até que um belo dia, no longínquo ano de 2011 (!) encontrou uma oportunidade de carreira no setor público, onde atua desde então. Tem aspirações de atuar na área de desenvolvimento de novas tecnologias, mais especificamente na criação de gadgets. É também um cara enorme (não acha, mas dizem isso, fazer o que?), que amedronta os outros só com seu olhar e seu 1,91m de altura. É bem humorado, apesar de parecer marrento as vezes (só parece). Mas por via das dúvidas, evite provocá-lo. ;P