right click sheet tabview codecopy/paste this. I commented out other
examples
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Column < 2 Then Exit Sub
'Target.Offset(, -1) = Target.Row
'If Target 4 Then Target.Borders.Weight = xlThick
''If Target = "jj" Then Target.Font.Bold = True
Select Case Target
Case "jj", "kk", "ll" : Target.Font.Bold = True
End Select
End Sub
--
Don Guillett
SalesAid Software
"INFO@Skyline" wrote in message
...
I need certain words in my scedules to be bold. I dont want to have to go
through all my charts and select these individual words & i would like to
have these specific words just become bold as i type them in the future.
Please help.