Click on cell A1 in Sheet2 and:

Insert Hyperlink to a place in this document

This will create a hyperlink to itself. Then in the worksheet code area,
insert the following:

Private Sub Worksheet_FollowHyperlink(ByVal Target As Hyperlink)
If Target.Parent = "Sheet2!A1" Then
Application.Quit
End If
End Sub

--
Gary''s Student - gsnu200781


"Pimamedic" wrote:

Is there a way in Excel 2002 to make a link so that one click will close the
program, take me to the exit routine?

Thank you