sebastriantran
New Member
- Joined
- Sep 19, 2014
- Messages
- 31
Hi there,
I am building a add-in, so that any workbooks that contain worksheets name "Tickmarks", the column A's font in worksheets Tickmarks will automatically change to Bold. I tried to use Workbook_SheetActivate Even but it does not work for other workbook.
Code:
I am building a add-in, so that any workbooks that contain worksheets name "Tickmarks", the column A's font in worksheets Tickmarks will automatically change to Bold. I tried to use Workbook_SheetActivate Even but it does not work for other workbook.
Code:
Any suggestion?Private Sub Workbook_SheetActivate(ByVal Sh As Object)
If Sh.Name = "Tickmarks" Then
With Worksheets("Tickmarks").Range("A:A").Font
.Bold = True
.Color = -16776961
.TintAndShade = 0
End With
End If
End Sub
Last edited: