ActiveCell = Yes

[gheyman]

I am trying to figure out how to make the active cell on a sheet = "Yes" when it is doubleCliked.

Any suggestion are appreciated.

Thanks

 

[Mike Blackman]

Hi,

Does this not work?

ActiveCell = "Yes"

 

[gheyman]

No, that is what I am using. but I must be missing something

Private Sub Worksheet_BeforeRightClick(ByVal Target As Range, Cancel As Boolean)
ActiveCell = "Yes"
End Sub

 

[Tom Urtis]

In the sheet module:

Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
Cancel = True
Target.Value = "Yes"
End Sub

 

[lenze]

Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
If Target.Coulmn <>3 Then Exit Sub 'Sets range to column "C" adjust for your needs
If Target <> "Yes" Then
    Target = "Yes"
Else: Target = ""
End If
Cancel = True
End Sub

This will toggle between "YES" and a blank when cell is doubleclicked

HTH
lenze