EASY: VBA to center text and set font color

[the2js97]

Sounds easy, I want to center the text in Column C. I was trying to use the following code but it failed:
With Sheets("TOC")
.Range("C:C").HorizontalAlignment = xlCenter
End With

Also tried to change the font color of Column B to black by using the following code but it failed:
With Sheets("TOC")
.Range("B:B").Font.Color = RGB(0, 0, 0)
End With

Thanks in advance

 

[Travis]

Try this

Sub Macro1()
    With Sheets("TOC")
        .Columns("C:C").HorizontalAlignment = xlCenter
        .Columns("B:B").Font.Color = RGB(0, 0, 0)
    End With
End Sub

using .Range should have worked too...Im not seeing why it didnt.

Sub Macro1()
    With Sheets("TOC")
        .Range("C:C").HorizontalAlignment = xlCenter
        .Range("B:B").Font.Color = RGB(0, 0, 0)
    End With
End Sub

 

[the2js97]

Thanks for the new code.

After closing Excel and starting again my original code worked. Sorry for the "head scratching."

Thanks again for your efforts

 

[Scott Huish]

Black is one of the 8 named Excel colors, you can also refer to it as vbBlack

Here is the list:

vbBlack
vbRed
vbGreen
vbYellow
vbBlue
vbMagenta
vbCyan
vbWhite