Timestamp help!

[ownerhelp]

I have a hyperlink macro counter in Sheet1 that puts the number of times I click on the word "open script" next to that cell. For example if i click on "open script" that is located in A1 the number 1 appears on B1. If I click on "open script" again the number 2 appears in B1 and it keeps adding it up everytime I click "Open Script". I want to timestamp Column C1 every time B1 changes but keeps adding a timestamp below it. For example:

A
Open Script

B1
3

C1
9/13/2011 12:01:03
9/13/2011 12:01:52
9/13/2011 12:02:14

can someone please help me I need this before the end of the day!!

 

[bensonsearch]

hi, something like the below
would need to save the last value of B1 somewhere (i have used Y2)

dim count as long
dim counta as long
dim countb as long
 
count = worksheets("Sheet1").range("B1").value
counta = worksheets("Sheet1").range("Y2").value
countb = Application.CountA(Range("C:C")) + 1
 
if count = counta then
'nothing
else
worksheets("Sheet1").range("c"&countb).value = count + 1
end if