Unload Control Panel and Load another Userform

[RockandGrohl]

Hi guys, bashing my head against a wall here.


Here's how I load my Control Panel Userform from a button on my sheet:

Sub CPanel_Click()

Load CPanel
CPanel.Show

End Sub

Private Sub Userform_Initialize()

Me.StartUpPosition = 0
Dim Top As Double, Left As Double
Top = Abs(Application.Top) + _
(Application.Height - ActiveWindow.Height) + _
(Application.UsableHeight - ActiveWindow.UsableHeight)
Left = Abs(Application.Left) + ActiveWindow.Width - ActiveWindow.UsableWidth
Me.Top = Top
Me.Left = Left

End Sub

On this Control Panel Userform are many buttons, one of them is supposed to load an Import Panel, unloading the Control Panel in the process:

Private Sub ImportPanel_Click()

Call Userforms.ImportOpen

End Sub

Sub ImportOpen()

Load ImportPanel

End Sub

For some reason, this isn't doing anything, but before it was saying "Compile Error: expected function or variable" which isn't that helpful to me.

Any ideas? Cheers.

 

[Norie]

What if you try simply ImportOpen or Call ImportOpen

Private Sub ImportPanel_Click()

    Call ImportOpen

End Sub

 

[RockandGrohl]

Hi Norie, this just does nothing - the module is called and when I get to the line "Load ImportPanel" nothing happens.

Also, my VBA window has gone weird - the project and properties window have stretched across the entire Visual Basic window, and the actual code is squashed underneath, and I can't seem to resize or dock the Project or Properties windows.

 

[RoryA]

Load does not show a form, it merely loads it (as in your original button)

 

[RockandGrohl]

Hi Rory,

If I double click the "Import" button I go straight to the code for loading the panel:

Private Sub ImportPanel_Click()

Load ImportPanel


End Sub

If I run this code, when I get to "Load ImportPanel" it says "Run Time Error 361 - can't load or unload this object"

Also adding a ImportPanel.show line gives an error too.

 

[RockandGrohl]

I've changed the name of the macro to not be the same as the UserForm. So there's one "ImportPanel" now in my sheet and it's the Userform. The Macro inside the button that calls the import panel to load is now called "imp_button"

Now when I do "ImportPanel.Show" it loads - because it's not trying to "show" a macro, it's showing ImportPanel which is now only ever going to be a Userform.

Once again fantastic Excel and VBA error messaging to the rescue.

Is Excel 365 any more verbose with the VBA error messaging or is it largely unchanged?

 

[RoryA]

VBA hasn't really changed a lot in the last 20 years.

 

[RockandGrohl]

I know it's not the preferred language to write code in, but it's pretty widespread, I wonder why they can't try and make it more user friendly like other languages.

 

[RoryA]

It's not part of their future roadmap so they won't invest in it.