Boa Tarde Gonçalo, o procedimento abaixo declara duas variáveis para conter os limites inferior e superior e utiliza um laço For..Next para percorrer o intervalo e ocultar as colunas selecionadas, utilizando column(número da coluna).
Sub ocultaColuna()
Dim colunaInicial As Long
Dim colunaFinal As Long
colunaInicial = 15
colunaFinal = 20
For i = colunaInicial To colunaFinal
Columns(i).Select
Selection.EntireColumn.Hidden = True
Next i
End Sub
Para retornar o número de uma coluna a partir do endereço, utilize:
Range("O:O").column