Página 1 de 1

Ocultar e reexibir Colunas com Check box ?

Enviado: 03 Mai 2020 às 20:07
por ADILSON21
Qual o código VBA tenho que inserir para o ocultar e reexibir uma coluna usando a Caixa de Seleção do Controle de Formulário ou Controle ActiveX?

Ocultar e reexibir Colunas com Check box ?

Enviado: 04 Mai 2020 às 04:44
por AfonsoMira
Boas.

Penso que este seja o código que procura.

Apenas terá que o adaptar ao seu caso.

Insira este código no click do CheckBox.

Se necessitar ajudar favor só dizer.
Código: Selecionar todos
If CheckBox1.Value = True Then
    
    'Seleciona Coluna F
    Columns("F:F").Select
    'Oculta Coluna F
    Selection.EntireColumn.Hidden = True

Else

    'Seleciona Coluna F
    Columns("F:F").Select
    'Reexibe Coluna F
    Selection.EntireColumn.Hidden = False

End If

Ocultar e reexibir Colunas com Check box ?

Enviado: 04 Mai 2020 às 12:49
por ADILSON21
@AfonsoMira, primeiramente quero agradecer a iniciativa de querer ajudar. Coloquei este código e veja o que acontece: ele oculta varia colunas, pode verificar oque está errado por favor?
Mandei a planilha no seu e-mail: ************a@gmail.com

Ocultar e reexibir Colunas com Check box ?

Enviado: 04 Mai 2020 às 13:11
por AfonsoMira
Vou ver e ainda hoje irei tentar responder.

Ocultar e reexibir Colunas com Check box ?

Enviado: 05 Mai 2020 às 22:30
por ADILSON21
Afonso achei o que estava dando pau aqui, era uma mesclagem de colunas que tinha bem abaixo, daí quando eu executava ele ocultava tudo que estava mesclado, não considerando somente a coluna que desejava. Mas está certo o que vc enviou. Obrigado!!!