View Single Post
  #1   Report Post  
Posted to microsoft.public.excel.programming
RJH RJH is offline
external usenet poster
 
Posts: 44
Default Double-click date entry

I can get the code below to work in any cell I double-click in. I would
like to limit the double-click event to column 1 only. The rest of the
sheet should function as normal. How do I limit the date entry to to a
single column and then have the active cell jump automatically one column to
the left?

Private Sub Workbook_SheetBeforeDoubleClick(ByVal Sh As Object, ByVal
Target As Range, Cancel As Boolean)
ActiveCell.Value = Format(Now(), "mm-dd-yyyy")
End Sub

Thanks for your help!

Bob Howard