Hoopsah
07-22-2008, 12:50 AM
Hi,
wonder if this is possible.
I had a look at a piece of coding someone had posted on here so that if you double click a cell it will change the colour of the text in that cell.
Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
If Target.Font.ColorIndex = 10 Then
Target.Font.ColorIndex = 3
Cancel = True
Exit Sub
End If
If Target.Font.ColorIndex = 3 Then
Target.Font.ColorIndex = xlAutomatic
Cancel = True
Exit Sub
End If
Target.Font.ColorIndex = 10
Cancel = True
End Sub
What i would like to be able to do, is to double click and it will insert a symbol into the cell. Wingdings character 252 - a big tick (Can't find a big cross yet)
I have tried doing a validation, but the drop down option shows as 'u' (With a wee tilda over it)
If not I will try something else, but just in case anyone knows if this is possible and how to do it,
Thanks for your help guys
Hoopsah
wonder if this is possible.
I had a look at a piece of coding someone had posted on here so that if you double click a cell it will change the colour of the text in that cell.
Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
If Target.Font.ColorIndex = 10 Then
Target.Font.ColorIndex = 3
Cancel = True
Exit Sub
End If
If Target.Font.ColorIndex = 3 Then
Target.Font.ColorIndex = xlAutomatic
Cancel = True
Exit Sub
End If
Target.Font.ColorIndex = 10
Cancel = True
End Sub
What i would like to be able to do, is to double click and it will insert a symbol into the cell. Wingdings character 252 - a big tick (Can't find a big cross yet)
I have tried doing a validation, but the drop down option shows as 'u' (With a wee tilda over it)
If not I will try something else, but just in case anyone knows if this is possible and how to do it,
Thanks for your help guys
Hoopsah