Excel 2003 - Realtidsklocka


Recommended Posts

Har en arbetsbok i Excel 2003 som jag har 2 kalkylblad i, det ena bladet är kopierat till det andra och i en ruta i både blad 1 och blad 2 så har jag en klocka som jag vill ska uppdateras varje sekund.

Det fungerar i blad 1, men inte i blad 2, måste jag ändra i koden som jag inte skrivit själv, kommer från:

Kents Excelsida - Digitalklocka

www.kentexcel.com

Min kod ser ut så här:

Modul1

Sub Uppdatera()
ThisWorkbook.Sheets(1).Calculate
' Kör proceduren Uppdatera om en sekund
NästaSekund = Now + TimeValue("00:00:01")
Application.OnTime NästaSekund, "Uppdatera"
End Sub

Blad 1 = "Göran Strömstedt"

Blad 2 = "Mischa Pettersson"

Alla tips är välkomna, tack på förhand !

support4free@msn.com

/ Support4Free

Link to comment
Share on other sites

Join the conversation

You can post now and register later. If you have an account, sign in now to post with your account.

Guest
Reply to this topic...

×   Pasted as rich text.   Paste as plain text instead

  Only 75 emoji are allowed.

×   Your link has been automatically embedded.   Display as a link instead

×   Your previous content has been restored.   Clear editor

×   You cannot paste images directly. Upload or insert images from URL.

Loading...
 Share