Tick mark
Private Sub Worksheet_BeforeDoubleClick(ByVal _
Target As Range, Cancel As Boolean)
If Target.Cells.Count 1 Then Exit Sub
With Target
.Font.Name = "Marlett"
.Font.Size = 12
.Value = "a"
End With
Cancel = True
End Sub
Right-click on the sheet tab and "View Code"
Copy/paste the code into that sheet module.
Gord Dibben MS Excel MVP
On Mon, 4 Jan 2010 21:52:01 -0800, Rohinikumar
wrote:
Hi How do i add tick mark in excel sheet?i know its in symbol but i want to
prepare yes or no tick mark...
|