Quote Originally Posted by vbfbryce View Post
But you don't need to select the columns first, so more like this:

Code:
Sub hideCols()
    Dim ws As Worksheet
    
    Set ws = ActiveSheet
    ws.Range("g1:m1").EntireColumn.Hidden = True
    ws.Range("p1").EntireColumn.Hidden = True
    ws.Range("t1:z1").EntireColumn.Hidden = True
    Set ws = Nothing
End Sub
Bryce you work to hard!
Code:
 ActiveSheet.Range("g:m, p:p, t:z").EntireColumn.Hidden = True
Or is it that you get paid by the line?