Como marcar a caixa de seleção com base no valor da célula no Excel?
Você pode saber como alterar o valor de uma célula com base em uma caixa de seleção. Mas, você sabe como marcar uma caixa de seleção automaticamente com base no valor de uma célula no Excel? Este artigo mostrará métodos para alcançá-lo.
Marque a caixa de seleção com base no valor da célula com fórmula
Marque a caixa de seleção com base no valor da célula com código VBA
Marque a caixa de seleção com base no valor da célula com fórmula
Suponha que você queira que a caixa de seleção 1 seja marcada automaticamente quando o valor na célula A1 for igual a “Teste”. Faça o seguinte.
1. Depois de inserir a caixa de seleção (Controle de formulário), selecione-a e vincule-a a uma célula C2 especificada inserindo = C2 na barra de fórmulas.
Escolha Controle ActiveX caixa de seleção, clique com o botão direito e selecione Properties no menu do botão direito. E no Properties caixa de diálogo, digite o célula ligada no Célula Vinculada campo e feche a caixa de diálogo. Veja a imagem:
2. Selecione a célula alinhada (C2) e insira a fórmula = SE (A2 = "Teste", VERDADEIRO, FALSO) na barra de fórmulas e, em seguida, pressione o botão Entrar chave.
Anote os: Na fórmula, A2 e Teste são a célula e o valor da célula em que você precisa marcar a caixa de seleção automaticamente.
3. Ao inserir o valor “Teste” na célula A1, a caixa de seleção correspondente será marcada automaticamente. Veja a imagem:
Observação: esta fórmula não diferencia maiúsculas de minúsculas.
Marque a caixa de seleção com base no valor da célula com código VBA
Você pode executar o seguinte código VBA para marcar a caixa de seleção com base no valor da célula no Excel.
1. Clique com o botão direito no Aba Folha com a caixa de seleção marcada com base no valor da célula e clique em 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 na janela Código.
Código VBA: marque a caixa de seleção com base no valor da célula
Private Sub Worksheet_Change(ByVal Target As Range)
If Range("A2").Value = "Test" Then
ActiveSheet.CheckBoxes("Check Box 1").Value = xlOn
Else
ActiveSheet.CheckBoxes("Check Box 1").Value = xlOff
End If
End SubAnote os: No código, A2 e Teste são a célula e o valor da célula que você precisa para marcar a caixa de seleção automaticamente com base em. A caixa de seleção 1 é o nome da caixa de seleção.
3. Pressione outro + Q para fechar a janela Microsoft Visual Basic for Applications.
Ao inserir o valor “Teste” na célula A2, a caixa de seleção especificada será marcada automaticamente.
Anote os: Este código diferencia maiúsculas de minúsculas.
Dica: Se você deseja inserir várias caixas de seleção em um intervalo selecionado em massa, você pode tentar o Caixas de seleção de inserção de lote utilidade de Kutools for Excelou inserir em lote vários botões de opção com o Botões de opção de inserção em lote Utilitário. Além disso, você pode excluir todas as caixas de seleção de uma vez com o Caixas de seleção para exclusão em lote utilitário como as imagens abaixo mostradas. Você pode ir para download Kutools for Excel! (30-dia de avaliação gratuita).
Artigos relacionados:
- Como alterar um valor ou cor de célula especificada quando a caixa de seleção está marcada no Excel?
- Como destacar uma célula ou linha com checkbox no Excel?
- Como inserir carimbo de data em uma célula se uma caixa de seleção no Excel estiver marcada?
- Como filtrar dados com base na caixa de seleção do Excel?
- Como ocultar a caixa de seleção quando a linha está oculta no Excel?
- Como criar uma lista suspensa com várias caixas de seleção no Excel?
Melhores ferramentas de produtividade de escritório
Aprimore suas habilidades de Excel com Kutools for Excele experimente eficiência como nunca antes. Kutools for 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 a 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!
