Mega Code Archive

 
Categories / VisualBasic Script / Excel
 

BeforeDoubleClick event

Private Sub Worksheet_BeforeDoubleClick _     (ByVal Target As Excel.Range, Cancel As Boolean)     Target.Font.Bold = Not Target.Font.Bold     Cancel = True End Sub