VBA -- DoubleClick on Cell with Value = 1

I've follow this tutorial
http://theclosetentrepreneur.com/how...click-in-excel

Its pretty much easy to follow. Now.. I am trying to figure out how to code in Value 1 and Null every time I double click on cell. ( i.e. *double click* value = 1 appears on cell; *double click* nothing show in cell)

I've started this code.

Please Login or Register  to view this content.

I am not get anything... No double click but a blinking crusor. What am I missing here. Please help

Awesome! Thank you Alansidman and Crooza!

One more thing (If you don'y mind ) I realize this string applies to every cells in worksheet. I suppose there are something I could do to get this string to focus only on target range i.e. cell B3 to B10 or Table column called "Complete"

I have tried

Please Login or Register  to view this content.

or

Please Login or Register  to view this content.

. I am getting No luck! Can you guys help?

How about Tables? using this code

Table Name: "ChkLst"
Column Name: "Done"

Using this code at top before the value. i.e.

Please Login or Register  to view this content.

Entire code.

Please Login or Register  to view this content.

Reason of this... Table have capability of inserting row by Hitting tab button and automatically write code instead of manually add it myself.

Let me know

Yes....Yes almost getting there with this code at below. But this one applies for entire columns on table itself. Let Say if I need to only have one column such as "Column1" that allows double click with value of 1 showing up in cells. And rest of "column2", "column3" will not have double click feature, but use normal input instead. Is it possible?

Let me guess. will this code string

Please Login or Register  to view this content.

after the

Please Login or Register  to view this content.

work ?

Please Login or Register  to view this content.

Oh my goodness! *face palm* How could I forget that? I am so embarrassed. Sometimes we focus on one thing and forgot the important part. Its now working I can't thank you enough for your time and patience, YOU... ARE... AWESOME.