Hi Paul
you can use the SelectionCange event. Put the following code in your
worksheet module:
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Target.Cells.Count 1 Then Exit Sub
If Intersect(Target, Me.Range("A1")) Is Nothing Then Exit Sub
MsgBox "cell A1 is active"
End Sub

everytime you select cell A1 a messagebox appears


--
Regards
Frank Kabel
Frankfurt, Germany

Paul wrote:
XL 2000

I would like a macro to open a dialogue box when a user
makes a cell active.

Can anyone point me in the direction of some basic code?

Thank you, Paul