Neste artigo, usaremos o evento before double click da planilha para marcar e desmarcar a célula.
Os dados brutos consistem em alguns itens alimentares. Queremos marcar os itens que compramos.
Ao clicar duas vezes em uma célula, uma marca de seleção será adicionada a ela. Da mesma forma, ele pode ser removido clicando duas vezes nele novamente.
Explicação do código
Se Target.Column = 3 Then
O código acima é usado para restringir o evento de clique duplo a ser executado apenas quando a célula na 3ª coluna for clicada duas vezes.
Cancelar = Verdadeiro
O código acima é usado para evitar que uma célula entre no modo de edição.
Target.Font.Name = "Marlett"
O código acima é usado para atribuir a fonte Marlett à célula de destino.
Se Target = "" Então
Alvo = "a"
Outro
Alvo = ""
Fim se
O código acima é usado para inserir uma marca de seleção e removê-la também. Na fonte Marlett, “a” representa a marca e um espaço em branco é usado para remover a marca.
Siga abaixo para o código
Option Explicit Private Sub Worksheet_BeforeDoubleClick (ByVal Target As Range, Cancel As Boolean) 'Verificando se a célula de destino está na terceira coluna If Target.Column = 3 Then' Impedir que a célula entre no Modo de Edição Cancel = True 'Alterando o tipo de fonte da célula Target. Font.Name = "Marlett" 'Verificando se o valor da célula de destino está em branco e inserindo o tick If Target = "" Then Target = "a" Else Target = "" End If End If End Sub
Se você gostou deste blog, compartilhe com seus amigos no Facebook. Além disso, você pode nos seguir no Twitter e no Facebook.
Gostaríamos muito de ouvir de você, diga-nos como podemos melhorar nosso trabalho e torná-lo melhor para você. Escreva para nós no site de e-mail