VBA to format left header specific text

[S_SSharma1212]

I wanna change the font and size of the entire left header and make part of that header Bold. Since this doesn't have a cell reference I'm having difficulty trying to figure out how to do this. Advance Thanks for all the answers.
Note that the header info is being fed in using a userform to get the Number and name.

This is what i'm currently getting:

This is what i want it to look like:

 

[rlv01]

Are you trying to do this in a cell, or in a userform control like a text box or label?

 

[S_SSharma1212]

Are you trying to do this in a cell, or in a userform control like a text box or label?

So the output would actually be in the header. But the input values are from a userform.

 

[rlv01]

So the output would actually be in the header. But the input values are from a userform.

Remember that I have no context for what you are doing unless you explain it. Your use of the term "the header" has no meaning to me.

 

[S_SSharma1212]

Remember that I have no context for what you are doing unless you explain it. Your use of the term "the header" has no meaning to me.

The page header, that is only visible in the page layout view. I'm trying to update the info in the leftheader of the sheet.

 

[rlv01]

It looks like it should be possible.

Sub HeaderTest()

    Dim HeaderText As String
    Dim JobNo As String
    Dim CustName As String
    
    JobNo = "1234"
    CustName = "SS"

    HeaderText = "&""-,Bold""Job Number: &""-,Regular""" & JobNo & Chr(10) & "&""-,Bold""Customer: &""-,Regular""" & CustName
    
    With ActiveSheet.PageSetup
        .LeftHeader = HeaderText
    End With
End Sub

 

[S_SSharma1212]

It looks like it should be possible.

Sub HeaderTest()

    Dim HeaderText As String
    Dim JobNo As String
    Dim CustName As String
   
    JobNo = "1234"
    CustName = "SS"

    HeaderText = "&""-,Bold""Job Number: &""-,Regular""" & JobNo & Chr(10) & "&""-,Bold""Customer: &""-,Regular""" & CustName
   
    With ActiveSheet.PageSetup
        .LeftHeader = HeaderText
    End With
End Sub

Thank You for the help. The bold part is working perfectly now. Would It also be possible to change the font from default to "Cambria"?

 

[rlv01]

I suppose that it would be possible, but you'll need to experiment to determine that. I recommend using the macro recorder to record yourself manually changing the font. Then by inspecting the macro recorder code, you should be able to see how to add that part to your code.

 

[S_SSharma1212]

I suppose that it would be possible, but you'll need to experiment to determine that. I recommend using the macro recorder to record yourself manually changing the font. Then by inspecting the macro recorder code, you should be able to see how to add that part to your code.

Thanks for your Help.