ExcelBanter

ExcelBanter (https://www.excelbanter.com/)
-   Excel Programming (https://www.excelbanter.com/excel-programming/)
-   -   Testing if Userform loaded (https://www.excelbanter.com/excel-programming/388465-testing-if-userform-loaded.html)

Nigel

Testing if Userform loaded
 
Hi All
How can I test if a userform is loaded in memory?

I have a userform that can be loaded and not visible or just not loaded.
Before I manipulate the controls on the form I need to determine if it is
memory.

Thank You

--
Cheers
Nigel





Peter T

Testing if Userform loaded
 
Hi Nigel,

If UserForms.Count = 0 Then
MsgBox "no forms are loaded"
End If

Regards,
Peter T

"Nigel" wrote in message
...
Hi All
How can I test if a userform is loaded in memory?

I have a userform that can be loaded and not visible or just not loaded.
Before I manipulate the controls on the form I need to determine if it is
memory.

Thank You

--
Cheers
Nigel







Nigel

Testing if Userform loaded
 
Hi
Thanks for the suggestion, in this case I think it will work. But I may
have more than one form and wanted something to test for a specific form
being in memory. Possible?

something like

If userform1.loaded then
do what i need to do
End If

--
Cheers
Nigel



"Peter T" <peter_t@discussions wrote in message
...
Hi Nigel,

If UserForms.Count = 0 Then
MsgBox "no forms are loaded"
End If

Regards,
Peter T

"Nigel" wrote in message
...
Hi All
How can I test if a userform is loaded in memory?

I have a userform that can be loaded and not visible or just not loaded.
Before I manipulate the controls on the form I need to determine if it is
memory.

Thank You

--
Cheers
Nigel









Peter T

Testing if Userform loaded
 
' for testing
' x = UserForm2.Caption ' loads if not already

If UserForms.Count 0 Then
For i = 0 To UserForms.Count - 1
Debug.Print UserForms(i).Caption, UserForms(i).Visible
Next
End If

You could unload forms in the loop if necessary.

Regards,
Peter T

"Nigel" wrote in message
...
Hi
Thanks for the suggestion, in this case I think it will work. But I may
have more than one form and wanted something to test for a specific form
being in memory. Possible?

something like

If userform1.loaded then
do what i need to do
End If

--
Cheers
Nigel



"Peter T" <peter_t@discussions wrote in message
...
Hi Nigel,

If UserForms.Count = 0 Then
MsgBox "no forms are loaded"
End If

Regards,
Peter T

"Nigel" wrote in message
...
Hi All
How can I test if a userform is loaded in memory?

I have a userform that can be loaded and not visible or just not

loaded.
Before I manipulate the controls on the form I need to determine if it

is
memory.

Thank You

--
Cheers
Nigel











Peter T

Testing if Userform loaded
 
Just to add, if unloading forms loop like this

If UserForms.Count 0 Then
For i = UserForms.Count - 1 To 0
Unload UserForms(i)

Peter T


"Peter T" <peter_t@discussions wrote in message
...
' for testing
' x = UserForm2.Caption ' loads if not already

If UserForms.Count 0 Then
For i = 0 To UserForms.Count - 1
Debug.Print UserForms(i).Caption, UserForms(i).Visible
Next
End If

You could unload forms in the loop if necessary.

Regards,
Peter T

"Nigel" wrote in message
...
Hi
Thanks for the suggestion, in this case I think it will work. But I may
have more than one form and wanted something to test for a specific form
being in memory. Possible?

something like

If userform1.loaded then
do what i need to do
End If

--
Cheers
Nigel



"Peter T" <peter_t@discussions wrote in message
...
Hi Nigel,

If UserForms.Count = 0 Then
MsgBox "no forms are loaded"
End If

Regards,
Peter T

"Nigel" wrote in message
...
Hi All
How can I test if a userform is loaded in memory?

I have a userform that can be loaded and not visible or just not

loaded.
Before I manipulate the controls on the form I need to determine if

it
is
memory.

Thank You

--
Cheers
Nigel













Nigel

Testing if Userform loaded
 
Thanks - works a treat

--
Cheers
Nigel



"Peter T" <peter_t@discussions wrote in message
...
Just to add, if unloading forms loop like this

If UserForms.Count 0 Then
For i = UserForms.Count - 1 To 0
Unload UserForms(i)

Peter T


"Peter T" <peter_t@discussions wrote in message
...
' for testing
' x = UserForm2.Caption ' loads if not already

If UserForms.Count 0 Then
For i = 0 To UserForms.Count - 1
Debug.Print UserForms(i).Caption, UserForms(i).Visible
Next
End If

You could unload forms in the loop if necessary.

Regards,
Peter T

"Nigel" wrote in message
...
Hi
Thanks for the suggestion, in this case I think it will work. But I
may
have more than one form and wanted something to test for a specific
form
being in memory. Possible?

something like

If userform1.loaded then
do what i need to do
End If

--
Cheers
Nigel



"Peter T" <peter_t@discussions wrote in message
...
Hi Nigel,

If UserForms.Count = 0 Then
MsgBox "no forms are loaded"
End If

Regards,
Peter T

"Nigel" wrote in message
...
Hi All
How can I test if a userform is loaded in memory?

I have a userform that can be loaded and not visible or just not

loaded.
Before I manipulate the controls on the form I need to determine if

it
is
memory.

Thank You

--
Cheers
Nigel
















All times are GMT +1. The time now is 04:53 PM.

Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
ExcelBanter.com