Showing a Userform with VBA Code 2

[peterpcu]

Hi

I have been using:-

Screen1.show

to display a typical userform.

(Where Screen1 is the name of an existing userform)

Does anyone have any suggestions on how I can display the same form by using a userform name (eg 'Screen1' which is held in say cell A1 of a worksheet?

Regards

Pete

 

[shetlandbob]

The only way I can think would be like follows:

Sub test()
  Dim a As String
  a = Cells(1, 1).Value
  If (a = "UserForm1") Then
    UserForm1.Show
  End If
End Sub

Robert Cumming

http://www.consultantengineer.co.uk

 

[combo]

You can:

UserForms.Add("Screen1").Show

combo

 

[rmikesmith]

combo,

That doesn't work for me... "Object Required" error.


Regards,
Mike

 

[combo]

Mike,
I get the same error when there is no form with this name in the project from which the code runs, otherwise it works.

combo

 

[taupirho]

The following ought to work

vba.UserForms.Add(Cells(1, 1)).Show

 

[rmikesmith]

Combo,

Yep, got it. Curious as to the OP's reason/aim.


Regards,
Mike

 

[peterpcu]

Hi there,

Many thanks for the suggestions which worked an absolute treat! - I was indeed spoilt for choice.

Just to answer Mike's curiosity, I may have mentioned before that I am building a userform generator which builds userforms dynamically based on outputs from a database. Its going well..thanks to help from this great forum.

Regards

Pete