Put this code in a worksheet module

Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As
Boolean)
MsgBox "Worksheet_BeforeDoubleClick"
End Sub

... or this code in the ThisWorkbook module.

Private Sub Workbook_SheetBeforeDoubleClick(ByVal Sh As Object, ByVal Target
As Range, Cancel As Boolean)
MsgBox "Workbook_SheetBeforeDoubleClick"
End Sub

Double clicking on any cell should achieve what you want.

--
Regards
Andy Wiggins
www.BygSoftware.com
Home of "Save and BackUp",
"The Excel Auditor" and "Byg Tools for VBA"



"ties" wrote in message
...
I would like to add a OnClick event to a cell using VBA: A user clicks
certain cell and then for instance a form pops up. I'm not sure if it's
possible.

So far I have used Workbook_SheetSelectionChange, with which I can monitor
whether a cell is selected... This works pretty well, but it also reacts
when a user is scrolling the cursor with the arrow-keys over the cell and
offcourse doesn't react when the cell is already selected and the user
clicks the cell.

Does anyone know an easier solution than the one I found, which covers the
problems I encounter?

Thanks for your help
Thijs van Bon