Launch multiple userforms using double click

I'm new to VBA and need some help.

I have a worksheet with User forms. I have code that launches and locates my first user form when I double click within a range of cells. I would like to add a second range that will launch the second user form

my Code
Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
If Not Application.Intersect(Target, Range("B6:B206")) Is Nothing Then
Cancel = True

With DIMENSION_TYPES_LIST

.StartUpPosition = 0
.Left = Application.Left + (0.5 * Application.Width) - (0.5 * .Width) - 500
.Top = Application.Top + (0.5 * Application.Height) - (0.5 * .Height)
.Show

End With
End If

End Sub
My second range is c6 to c206 and the form name is frmdimensionbuilder

Thanks

Steve

You don't mention if you want both forms displayed at the same time - assuming not.

Please Login or Register  to view this content.

Typed freehand and guaranteed 100% untested...

Cytop,

You assumed correctly, Thank you for the response

I had to rem out the .startup position = 0 to get it to fire. it's amazing how complicated it is just to locate a form in VBA

thanks

Steve

...it's amazing how complicated it is just to locate a form in VBA

You should try positioning a custom pop-up menu at the mousepointer sometime ...

I'll take your word for it, My head already hurts