This page provides a custom timer add-in (.xla) that may work for you. It's the same idea as the code you have above (this would go in the form code-behind).
This page provides a custom timer add-in (.xla) that may work for you. It's the same idea as the code you have above (this would go in the form code-behind): Dim WithEvents CountdownTimer As TMTimer. ClsTimer Private Sub startCounter() Set CountdownTimer = TMTimer.
CreateTimer With CountdownTimer . CountdownDurationMilliSecs = 10 * 1000 . TimerType = .
TimerTypeCountdown . StartTimer End With End Sub Private Sub CountdownTimer_CountdownComplete() Me. De End Sub Private Sub UserForm_Activate() startCounter End Sub.
Thanks for the tought Kaveman, but unfortunately I need this to run without custom addins... – Ben F Dec 7 at 5:30.
I ran some tests and the problem seems to be that once you show the User Form, it takes control and does not return it to example2(). What seems to work is if you put the following code in your form's Acitvate sub, it will hide correctly. This may not be exactly what you want, you may be using the form for other things and this process will mess it up, but it gets you in the right direction.
Private Sub UserForm_Activate() Strt = Timer Do While Timer.
Thanks Matt, works like a charm. – Ben F Dec 8 at 0:36.
I cant really gove you an answer,but what I can give you is a way to a solution, that is you have to find the anglde that you relate to or peaks your interest. A good paper is one that people get drawn into because it reaches them ln some way.As for me WW11 to me, I think of the holocaust and the effect it had on the survivors, their families and those who stood by and did nothing until it was too late.