One way:

Put this in your worksheet code module (right-click on the worksheet tab
and choose View Code):

Private Sub Worksheet_SelectionChange(ByVal Target As Excel.Range)
Dim myForm As UserForm1
If ActiveCell.Address(False, False) = "A1" Then
Set myForm = New UserForm1
myForm.Show
End If
End Sub



In article <FzL1c.478$re1.235@newsfe1-win,
"paul" wrote:

Hi, I'm using XL 2000

I need to load UserForm1 when a user makes a worksheet cell A1 active.

The Userform returns a value to the Active cell which is why i need the cell
entered to call the userform.

Any ideas appreciated.

Thanks, Paul