macro not working (on click increment)

gsrikanth · #1 07-12-2012, 02:32 AM

Code:

Option Explicit
  Public ClickCount As Double
  Private Sub Worksheet_SelectionChange(ByVal Target As Range)
  If Target.Cells.Count > 1 Then Exit Sub
  ClickCount = ClickCount + 1
 Target.Value = ClickCount
  End Sub

Colin Legg · #2 07-12-2012, 07:40 AM

It works for me. You must make sure that the macro sits in a worksheet class module and that Application.EnableEvents is set to True.

Similar Threads
Thread	Thread Starter	Forum	Replies	Last Post
"On Click" for a picture effect not working	jhuth	PowerPoint	3	05-07-2012 10:20 AM
on click increment	gsrikanth	Excel Programming	1	02-23-2012 08:19 AM
“Click & drag ” stopped working	nicola65	Outlook	0	12-04-2011 06:35 PM
Word doc bug when closing from userform command button click macro	Joe Patrick	Word	1	07-05-2011 08:53 PM
Right click in Macro	MShroff	Word VBA	4	04-05-2011 09:00 PM