Time limit for a userform

[still learning]

Hi
Is there a way to limit the time a userform is up?
Not all users can see or know about the "X" in the userform to unload it.
I thought about adding a command button to "close" but I'm wondering if I can add a code to the macro
I'm onlky using 1 sheet in the workbook

Private Sub Workbook_Open()
Range("A1").Select
UserForm2.Show
End Sub

mike

 

[Norie]

MIke

You could use Application.OnTime to call a sub that unloads the userform

That code could go in the Initialize event of the userform.

Private Sub UserForm_Initialize()
     ' close form after 10 minutes
    Application.OnTime Now + TimeSerial(10, 0, 0), "UnloadForm"
End Sub

The UnloadForm code would go in a standard module.

Sub UnloadForm()
    Unload UserForm1
End Sub

If you took this approach you might need to consider some other factors.

For example,what should happen if the user interacts with the userform in the 10 minute period?

Should the timer be 'reset'?

What about saving data?

 

[still learning]

Hi Norie
I never thought about your questions about if the user is doing input and the time limit is up
See, that's why you get the big money
I'll add the command button to close for now
Thanks for your help

mike