loop or combine formatting columns

[288enzo]

I have this bit of code I'm trying to condense.

    Columns("F:G").NumberFormat = "0"
    Columns("I:J").NumberFormat = "0"
    Columns("L:M").NumberFormat = "0"
    Columns("O:P").NumberFormat = "0"

I've tried the following, but it didn't work.

    Columns("F:G,I:J,L:M,O:P").NumberFormat = "0"

I also recently learned about looping, but what has me perplexed is how to loop using letters?
My example would be something like

    Dim r As Long
    
    For r = 9 To 7 Step -1
        Columns(r & ":" & r + 1).NumberFormat = "0"
    Next r

I need help how to use this with column letters.

Thank you

 

[Fluff]

How about

Range("F:G,I:J,L:M,O:P").EntireColumn.NumberFormat = "0"

 

[288enzo]

How about

Range("F:G,I:J,L:M,O:P").EntireColumn.NumberFormat = "0"

Thank you, I didn't know you could use "Range" when selecting columns. I assume you can do the same with "EntireRow"?

 

[Fluff]

I assume you can do the same with "EntireRow"?

That's right.