none
Ocultar colunas RRS feed

  • Pergunta

  • Como faço para ocultar as colunas usando a numeração delas, ou seja, eu desejo via VBA ocultar as colunas 15 a 20 (seria da "O" à "S")

    sei fazer usando as letras que identificam as colunas, mas gostaria de atribuir uma variavel à coluna inicial que irei ocultar e outra à coluna final que irei ocultar (no exemplo uma varialvel receberia o numero 15 da coluna "O" e a outra variavel receberia o numero 20 da coluna "S") e na expressão usar estas variáveis para definer o intervalo que vou ocultar.

    segunda-feira, 4 de janeiro de 2016 19:45

Respostas

  • 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

    • Sugerido como Resposta André Santo segunda-feira, 4 de janeiro de 2016 19:55
    • Marcado como Resposta GoncaloPaulaSoares terça-feira, 5 de janeiro de 2016 11:29
    segunda-feira, 4 de janeiro de 2016 19:55