Éderson Mass

Obrigado. Funcionou certinho!

Mais alguém tem alguma ideia?

Sim, mais quanto a isso não é problema, as macros estão habilitadas em todas as máquinas, o meu problema é reexibir somente com o botão e o inputbox da senha, não podendo reexibir manualmente, seria uma espécie de bloquei de reexibição dessas colunas exceto pelo botão, pois de nada adianta o botão pedir senha se consigo reexibir manualmente. Cheguei até aqui: mas como disse, ainda é possível reexibir manualmente. Sub Ocultar()ActiveSheet.Columns("H:H").Hidden = TrueActiveSheet.Columns("I:I").Hidden = TrueActiveSheet.Columns("J:J").Hidden = TrueEnd SubSub 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 = FalseEnd IfEnd Sub

Bom dia! Sou novo por aqui e estou iniciando no VBA, hoje me deparei com essa situação e gostaria da ajuda de vocês. Tentei de várias formas 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.