View Single Post
  #3   Report Post  
Posted to microsoft.public.excel.worksheet.functions
Derek Foo Derek Foo is offline
external usenet poster
 
Posts: 2
Default Displaying of a cool virtual clock in Excel

Hi, thanks a lot ... that was cool and I like it a lot :-)

"FSt1" wrote:

hi
create a small form in excel with a single text box. then put this code in
the form.
Private Sub CB1_Click()
Load UserForm1
UserForm1.Show 0
Call xlClock
End Sub
Private Sub ShowxlClock()
If UserForm1.Visible = True Then
UserForm1.tb1.Value = Format(Now, "hh:mm:ss AM/PM")
Application.OnTime Now + TimeSerial(0, 0, 1), "xlClock"
Else
Exit Sub
End If
End Sub
you can install it as an addin. i have it in my personal.xls
i run this from a custom icon on my custom toolbar.

regards
FSt1

"Derek Foo" wrote:

Hi, anyone knows how to install and display a virtual clock in an Excel
worksheet?

Or rather, is that possible at all? Coz using the command of =NOW() in an
Excel worksheet will only display a static line of Date and Time. I thought
it will be a better presentation if a virutal clock can be installed as an
add-in in Excel worksheet.

Thanks :-)

Regards,
Derek