Change the font color

  • User can change the font color using (i)Range Object (ii) Cells Property
  • Download The Workbook

     

    Sub Change_The_Font_Color()

    'Range Object
    Sheet2.Range("D3").Font.ColorIndex = 9
    Sheet2.Range("D3:E6").Font.ColorIndex = 9
    Sheet2.Range("D3:E6").Font.ColorIndex = 1
    Sheet2.Range("D3:D4, E6:E7, F3:F4").Font.ColorIndex = 9
    Sheet2.Range("D3:F8").Font.ColorIndex = 1
    End Sub



    Sub Change_The_Font_Color_Using_Cells_Property()
    Sheet2.Cells(4, 4).Font.ColorIndex = 9
    'Range and Cells Property Combo
    Sheet2.Range(Cells(4, 4), Cells(5, 6)).Font.ColorIndex = 9
    Sheet2.Range("D3:F8").Font.ColorIndex = 1
    End Sub