I have a worksheet where I need to look at column and if the column is blank, I need to hide that column and another non adjacent column (example column C ="", then hide entire column C and I). I need to do this with four columns ( C, D, E, and F). If one of the four columns mentioned has contents I would need to leave that column unhidden along with its non adjacent column.


Below is what I have for VBA code, but it only seems to review column C and then stops.

If Application.WorksheetFunction.CountA(Range("C2" & FinalRow)) = "" Then
Columns("C").EntireColumn.Hidden = True
Columns("I").EntireColumn.Hidden = True

If Application.WorksheetFunction.CountA(Range("D2" & FinalRow)) = "" Then
Columns("D").EntireColumn.Hidden = True
Columns("J").EntireColumn.Hidden = True

If Application.WorksheetFunction.CountA(Range("E2" & FinalRow)) = "" Then
Columns("E").EntireColumn.Hidden = True
Columns("K").EntireColumn.Hidden = True

If Application.WorksheetFunction.CountA(Range("F2" & FinalRow)) = "" Then
Columns("F").EntireColumn.Hidden = True
Columns("L").EntireColumn.Hidden = True

End IF