Show userform when cell is selected

[buzz71023]

I need to be able to make a macro run to show a userform when a cell is selected. Hopefully this will fix the solution to my problem. I dont want an user to be able to enter data into this cell unless its through the useform. The cells defined name is "LotNumber".

 

[buzz71023]

This is what my code looks like

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
On Error GoTo ErrHandl
If Target.Name.Name = "LotNumber" Then LotNumber.Show
Exit Sub
ErrHandl:
Err.Clear
End Sub

 

[VoG]

I renamed my UserForm as LotNumber and it still works for me.

It should work in any version of Excel from 97 onwards.

In the code window press CTRL + G to open the Immediate window then in that window type

?Application.EnableEvents

then press Enter. Does it return True?

 

[buzz71023]

Am I suppose to define a cell name somewhere other to the left of the formula bar?

 

[buzz71023]

yes it did turn to true

 

[VoG]

Check in Name Manager that the named range applies to the correct cell (or, indeed, exists). Check for leading or trailing spaces.

 

[buzz71023]

Just wanted to say thanks for the help... I've given up on the idea for now, may address it later. Going to do some research on ideas. It just didnt make ,uch sense because I am using that cell/name for other userforms as well and they all work great. Again thanks for your time. Much appreciated.