Mais uma dica que salva o dia. Quando você bloqueia uma célula no Excel (Formatar células->Proteção->Bloquedas) e protege sua planilha, ao tentar editar uma célula, o que você faria normalmente com um duplo clique, o Excel nos presenteia com a seguinte mensagem:

Mas, pelo menos quanto ao duplo clique, é possível com uma pequena porção de código VBA alterar essa mensagem para algo mais amigável, principalmente nas nossas super e bem elaboradas planilhas.

Abra o VBA e no código a planilha com as células protegidas, adicione o seguinte:

Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
    If Target.Locked And ActiveSheet.ProtectContents Then
        MsgBox ("Não toque aqui!")
        Cancel = True
    End If
End Sub

O resultado não poderia ser melhor:

Bom, alterar a mensagem é com você! Um bom proveito!

Comentários

comentários