Change Font Color for regularly updated headers for all Excel workbook

[OneCat]

Hi,
I'm a new in VBA and I need help.
With this macros I'm updating the all sheets in the excel workbook regularly
Sub PQ()
Dim myRange As Range
Set myRange = Application.Selection
Set myRange = Application.InputBox("Select One Single Cell that you want to put its into Header or Footer", "InsertCellValueIntoHeader", myRange.Address, Type:=8)
For Each mysheet In Application.ActiveWorkbook.Worksheets
mysheet.PageSetup.CenterHeader = myRange.Value
Next
End Sub
How can I add Bold Century Gothic font with particular RGB Color to the macros?

 

[kevin9999]

Does the code sit in the workbook with the sheets you want to change?

 

[OneCat]

Does the code sit in the workbook with the sheets you want to change?

Yes, it is.
I've already found the soliton for Font and Bold RGB color RGB (2.182.179) only left

Sub PQ()
Dim myRange As Range
    Set myRange = Application.Selection
    Set myRange = Application.InputBox("Select One Single Cell that you want to put its into Header or Footer", "InsertCellValueIntoHeader", myRange.Address, Type:=8)
    For Each mysheet In Application.ActiveWorkbook.Worksheets
        mysheet.PageSetup.CenterHeader = "&""Century Gothic""&B" & myRange.Value
        Next
    End Sub

 

[kevin9999]

I've already found the soliton for Font and Bold RGB color RGB (2.182.179) only left

Does this this mean you still need assistance?

 

[OneCat]

Does this this mean you still need assistance?

Yes, please.
I don't know how to add RGB color to the macros.

 

[kevin9999]

I don't know whether you can refer to the RGB colors this way. Try the following line & see if it gives you what you want:

mysheet.PageSetup.CenterHeader = "&""Century Gothic,Bold""&K02B6B3" & myRange.Value

 

[OneCat]

Thank you very much!
The macros works! Where did you find the spreadsheet with colors codes? I mean - K02B6B3 and how to use it in the right way?

 

[kevin9999]

Thank you very much!
The macros works! Where did you find the spreadsheet with colors codes? I mean - K02B6B3 and how to use it in the right way?

Glad it worked
Apparently, you have to use the Hex numbers for this, not the RGB numbers. 02B6B3 = RGB(2,182,179). You can google rgb to hex conversions to find conversion tables/calculators.

 

[OneCat]

Thank you for your help! Have a good day.

 

[kevin9999]

Thank you for your help! Have a good day.

You too, and welcome to the forum