Como adicionar marca de seleção em uma célula com duplo clique no Excel?
Normalmente, para inserir uma marca de seleção em uma célula, você precisa entrar na caixa de diálogo Símbolo, localizar o símbolo da marca de seleção e inseri-lo manualmente. Mas não é tão fácil descobrir o símbolo de marca de seleção na caixa de diálogo Símbolo, pois há vários símbolos listados dentro. Como adicionar rapidamente uma marca de seleção em uma célula no Excel? Este artigo mostrará um método VBA para adicionar facilmente uma marca de seleção em uma célula apenas com um clique duplo.
Clique duas vezes para adicionar uma marca de seleção em uma célula com código VBA
Clique duas vezes para adicionar uma marca de seleção em uma célula com código VBA
O seguinte código VBA pode ajudá-lo a adicionar uma marca de seleção em uma célula com um clique duplo. Faça o seguinte.
1. Abra a planilha que você precisa para adicionar uma marca de seleção na célula, clique com o botão direito e selecione Ver código no menu do botão direito.
2. No Microsoft Visual Basic para Aplicações janela, copie e cole o código VBA abaixo no Code janela.
Código VBA: clique duas vezes para adicionar a marca de seleção em uma célula
Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
If Not Intersect(Target, Range("B1:B10")) Is Nothing Then
Application.EnableEvents = False
If ActiveCell.Value = ChrW(&H2713) Then
ActiveCell.ClearContents
Else
ActiveCell.Value = ChrW(&H2713)
End If
Cancel = True
End If
Application.EnableEvents = True
End Sub
Note: No código, B1: B10 é o intervalo que você adicionará com um clique duplo. Por favor, mude de acordo com sua necessidade.
3. aperte o outro + Q chaves para fechar o Microsoft Visual Basic para Aplicações janela e retornar à planilha.
Agora, clique duas vezes em qualquer célula no intervalo B1: B10, a marca de seleção será inserida automaticamente. E clicando duas vezes na célula novamente, a marca de seleção inserida será removida.
Se você precisa usar frequentemente as marcas de seleção em seu trabalho diário do Excel, aqui eu recomendo o Auto texto Utilidade de Kutools for Excel. Com este recurso, você pode salvar uma marca de seleção como uma entrada de texto automática e, em seguida, reativá-la no futuro com apenas um clique no Excel, conforme mostrado na demonstração abaixo.
Baixe e experimente agora! (trilha gratuita de 30 dias)
Artigos relacionados:
- Como clicar duas vezes em uma célula e adicionar 1 a esse valor de célula no Excel?
- Como adicionar / inserir automaticamente a data / hora atual em uma célula clicando duas vezes no Excel?
Melhores ferramentas de produtividade de escritório
Aprimore suas habilidades de Excel com o Kutools para Excel e experimente uma eficiência como nunca antes. Kutools para Excel oferece mais de 300 recursos avançados para aumentar a produtividade e economizar tempo. Clique aqui para obter o recurso que você mais precisa...
Office Tab traz interface com guias para o Office e torna seu trabalho muito mais fácil
- Habilite a edição e leitura com guias em Word, Excel, PowerPoint, Publisher, Access, Visio e Project.
- Abra e crie vários documentos em novas guias da mesma janela, em vez de em novas janelas.
- Aumenta sua produtividade em 50% e reduz centenas de cliques do mouse para você todos os dias!