building a better egg timer...

[m.hatter]

Hey all....need some help trying to build a simple "egg timer". (Don't ask why) I thought this would be super simple and I was basically on my way until I hit a little snag. The basic idea is as follows:

I set up an embedded command button right on the worksheet to launch a bit of vba code.

The code launches a simple form that uses a spin button connected with a text box. You can click the spin button and select a number between 1 and 120 that should be displayed in the text box.

As far as I know, I am pretty good up until this point. Problem is that I want to take the value that is entered into the text box via the spinner button and launch a form that says something like "Time is up" at a time that is x minutes in the future, where x is the number dialed in by the spinner box. Problem I am having is that I don't know how to use the onTime function with variables....

here is a copy of my bogus code associated with the user form described above: (known problem area in bold at the OKButton section)

Please Login or Register  to view this content.

Thanks for the help.
m.hatter

[pike]

Hi m.hatter
Have a look at this attached example by John Walkenbach
hope it helps

[m.hatter]

Hey Pike....
Funny you should post Walkenbach. I just bought his book and that it what has led me to this forum. Small world around here. Anyways, unless I am missing something I don't think that the progress indicator can help me here. I want a timer running in the background that pops up with a userform after the time has expired.

The time would be set in minutes by the user using the spinner button. So in short...why doesn't this code work?

Please Login or Register  to view this content.

Of course, the time interval should have been in the minutes section instead of the seconds section, but either way it was still not working. Thanks for the help.
m.hatter

[shg]

Please edit your post to add code tags.

Thanks.

[m.hatter]

....I think the answer is in here....

http://www.cpearson.com/Excel/OnTime.aspx

Just found the "search" option. uhhhh.
m.hatter

[m.hatter]

Ok...So I don't know if this is a "great" solution, but it actual does what I wanted it to do, so I guess I will call that a success.

Please Login or Register  to view this content.

m.hatter

[pike]

well done - if it works its a winner