Comments on: Time Picker

By: Andy Pope

Andy Pope — Thu, 16 Aug 2007 12:27:00 +0000

Hi Neil,

This quick mod will give you a modaless userform.
In the standard code module change the Main routine.
Sub Main()

FTime.Show vbModeless

End Sub

And in the userform change the Close button event.
Private Sub CommandButton1_Click()

Set m_clsClock = Nothing

Unload Me 'Me.Hide

End Sub

By: Neil

Neil — Thu, 16 Aug 2007 10:28:00 +0000

Andy – anyway of making the form modeless? I tried changing the code attached to the commandbutton, but that just crashed Excel!

By: Andy Pope

Andy Pope — Thu, 16 Aug 2007 08:28:00 +0000

Thanks for the comments guys.
And Dick, when I get another spare 5 minutes I will have a stab at rolling the hours

By: Dick Kusleika

Dick Kusleika — Wed, 15 Aug 2007 18:22:00 +0000

Oh, another thing: I must not have visited your site in a while. It looks great. Particularly those icons down the left side.

By: Dick Kusleika

Dick Kusleika — Wed, 15 Aug 2007 18:21:00 +0000

I agree with Harald. Two things for the next version: 1) When I move the minute hand past 12, the hour hand goes back to the previous hour. I’d like it to go forward. 2) Package that up into an ActiveX control for me when you get a few minutes.

By: Harald Staff

Harald Staff — Wed, 15 Aug 2007 15:01:00 +0000

Very impressive, Andy. You write beautiful code.

By: Andy Pope

Andy Pope — Sat, 11 Aug 2007 15:50:00 +0000

I have posted my attempt http://www.andypope.info/vba/clock.htm

I went with the technique Harald mentioned. That is constructing the hands out of multiple controls.
Unfortunately I could not come up with a solution to automatically incrementing am/pm so opted for a switch instead.

By: ross

ross — Tue, 07 Aug 2007 22:32:00 +0000

Works well, nice stuff. – Now if i could only think of a use for it!!!! lol!

By: jkpieterse

jkpieterse — Tue, 07 Aug 2007 18:08:00 +0000

I mocked something up:

http://www.jkp-ads.com/downloadscript.asp?filename=clockmouse.zip

By: Harald Staff

Harald Staff — Tue, 07 Aug 2007 12:42:00 +0000

I work in a pretty large company. Controls, ocx'es, dll's are easy to buy or make, impossible to deploy and maintain. I've also encountered severe stability problems using them on userforms. So I do whatever I can to avoid them.
But you're right, this is a simple task made complicated. Which is the fun part.