Guru do Excel e Power BI

Enviado: **31 Jul 2019 às 10:19**

OLá!
Sou novo por aqui e estou iniciando no VBA, me deparei com essa situação e gostaria da ajuda de vocês.

Tentei ajustar essa planilha mas como não tenho experiência em VBA não consegui.

Preciso de um código que oculte e reexiba as três colunas marcadas em cor diferente (h:j), clicando nos botões OCULTAR \ REEXIBIR porém solicitando senha para REEXIBIR. Isso seria para toda a pasta de trabalho, planilhas de janeiro a dezembro, cada aba nomeada com o respectivo mês. Estou mandando a planilha para analise. Desde já agradeço.

Enviado: **31 Jul 2019 às 10:39**

Cole este código num módulo, e depois atribua ao botão Exibir e macro Exibir, e o botão ocultar a macro Ocultar, isso em cada planilha...

Não esqueça de definir sua senha, no código está como "sua senha"

A função Hidden significa ocultar, só pra informação

Código: Selecionar todos

Sub Ocultar()

ActiveSheet.Columns("H:H").Hidden = True
ActiveSheet.Columns("I:I").Hidden = True
ActiveSheet.Columns("J:J").Hidden = True
End Sub
Sub Exibir()

If InputBox("Digite sua senha: ") = "sua senha" Then
    ActiveSheet.Columns("H:H").Hidden = False
    ActiveSheet.Columns("I:I").Hidden = False
    ActiveSheet.Columns("J:J").Hidden = False
End If

End Sub

Guru do Excel e Power BI

Ocultar e reexibir colunas com solicitação de senha

Ocultar e reexibir colunas com solicitação de senha

Re: Ocultar e reexibir colunas com solicitação de senha