Mega Code Archive

 

Categories / VisualBasic Script / Excel

 

Make the font in number cell bold

Sub BoldNCRows()   Dim rngRow As Range   For Each rngRow In Cells.SpecialCells(xlCellTypeConstants, xlNumbers).Rows     rngRow.Font.Bold = True   Next rngRow End Sub