Launch Userform when cursor enters cell

[megnin]

Is it possible to launch a Userform when a user enters a particular cell, either with the cursor or by mouse?

Thanks
DM

 

[lenze]

Use the WorkSheet Selection Change Event

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Target.Address=$A$1 Then Userform1.Load
End Sub

Place this code in the worksheet module

 

[Nimrod]

This code will open userform when the cell $A$1 is selected.

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
    If Target.Address = "$A" Then
        UserForm1.Show
    End If
End Sub

How to insert code:

Open VB Editor by: right clicking on the tab of the sheet you want code in, then select "view code" from drop

Once inside VB Editor Paste the code into the Right Window.
Done !
Note: in the code the "$A" should read "$A$1" for some reason the $1 gets lost when I paste it over as code.

_________________
NOTE: Testing performed on Win2K utilizing Office 2000. Solutions may need tweaking for other versions.<font size=+2><font color="blue"> Adieu,<font color="red">N<font color="blue">imrod</font></font></font>
This message was edited by Nimrod on 2002-05-29 09:18
This message was edited by Nimrod on 2002-05-29 09:19