Boa tarde, prezados.
Estou desenvolvendo uma planilha para o trabalho e nela eu tenho botões de controle de formulário, mais especificamente caixas de combinação, com as opções "Sim e Não". O Sim mantém um intervalo de linhas e o Não oculta as linhas desse intervalo. É de extrema importância que essa planilha seja bloqueada.
Tenho tentado, até então, sem sucesso, bloquear a planilha e permitir que os botões e a macro de ocultar as linhas ainda funcione.
Segue imagem dos botões:
Cada botão de controle está vinculado a uma célula. Quando a opção Sim é escolhida, a célula retorna 1, quando escolhe o Não, a célula retorna 2.
O código de ocultar as linhas tem sido esse:
"
Sub Botão ()
If Plan1.Range("L10") = "1" Then
Rows("44:46").Select
Selection.EntireRow.Hidden = False
End If
If Plan1.Range("L10") = "2" Then
Rows("44:46").Select
Selection.EntireRow.Hidden = True
End If
End Sub
"
Agradeço desde já se alguém puder me ajudar.