none
Ocultar colunas RRS feed

 > 

  • Pergunta

  • Question
    Entrar para Votar
    0
    Entrar para Votar

    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

  • Question
    Entrar para Votar
    1
    Entrar para Votar

    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
    |