Identifying BOLDED cell

[RalphT]

I am writing code where I need to be able to identify a cell with BOLD formatting and act on that information. How do I identify BOLDED cells?

 

[Somendra Misra]

Hi,

Try something like below:

If Range("A1").Font.Bold = True Then
        MsgBox "Cell is bold" 'Execute this part if cell is bold
    Else
    ' Execute this part if not bold
    End If

Regards,

 

[RalphT]

Many thanks!