Como alterar um valor ou cor de célula especificada quando a caixa de seleção está marcada no Excel?
Este artigo fala sobre como alterar o valor ou a cor de uma célula especificada por uma caixa de seleção. Por exemplo, quando uma determinada caixa de seleção é marcada, o valor ou a cor de fundo de uma célula especificada será alterado automaticamente. Siga os métodos abaixo, passo a passo, para lidar com isso.
Alterar um valor de célula especificado quando a caixa de seleção é marcada com a fórmula
Alterar um valor de célula especificado quando a caixa de seleção estiver marcada com o código VBA
Alterar uma cor de célula especificada quando a caixa de seleção estiver marcada com o código VBA
Alterar um valor de célula especificado quando a caixa de seleção é marcada com a fórmula
Supondo que você precise que a célula A1 seja preenchida com o valor “teste” quando a caixa de seleção 1 for marcada. E apague a célula ao desmarcar a caixa de seleção. Faça o seguinte.
Você precisa primeiro vincular a caixa de seleção a uma determinada célula e, em seguida, aplicar a fórmula para alcançá-la.
1. Para vincular a caixa de seleção a uma determinada célula, selecione-a e, a seguir, insira = referência da célula na Barra de Fórmulas e pressione a tecla Enter. Aqui, vinculo a caixa de seleção 1 à célula C2 com a inserção = C2 na Barra de Fórmulas após marcar a caixa de seleção.
Para a caixa de seleção Controle ActiveX, clique com o botão direito e selecione Propriedades no menu do botão direito. E no Propriedades caixa de diálogo, insira a célula vinculada no Célula Vinculada campo e feche a caixa de diálogo. Veja a imagem:
2. Selecione a célula que você precisa para alterar seu valor (aqui eu seleciono A1) e, em seguida, insira a fórmula = SE (C2, "Teste", "") na barra de fórmulas e pressione o botão Entrar chave. Veja a imagem:
Note: Na fórmula, C2 é a célula vinculada da caixa de seleção 1, “Teste” é o valor que você precisa exibir na célula A1 quando a caixa de seleção é marcada.
Você pode ver os resultados conforme as capturas de tela abaixo, mostradas após marcar ou desmarcar a caixa de seleção correspondente.
Alterar um valor de célula especificado quando a caixa de seleção estiver marcada com o código VBA
Você também pode alterar um valor de célula especificado quando a caixa de seleção é marcada com o código VBA. Faça o seguinte.
1. Clique com o botão direito na guia Planilha com o valor da célula que você precisa alterar com base na caixa de seleção 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 no Code janela.
Código VBA: alterar um valor de célula especificado quando a caixa de seleção estiver marcada
Private Sub CheckBox1_Click()
Dim xRng As Range
Dim xCell As Range, xStr As String
Set xRng = Selection
If CheckBox1.Value = True Then
xStr = InputBox("Please enter a value:", "Kutools for Excel")
xRng.Value = xStr
If xStr = "" Then CheckBox1.Value = False
Else
xRng.Value = ""
End If
End Sub
Note: No código, Caixa de verificação1 é o nome do Caixa de seleção (controles ActiveX). Você pode alterá-lo conforme necessário.
3. aperte o outro + Q simultaneamente para fechar o Microsoft Visual Basic para Aplicações janela.
4. Selecione uma célula em branco (A1) cujo valor deseja alterar com base na caixa de seleção e marque a caixa de seleção 1 em sua planilha. Agora um Kutools for Excel caixa de diálogo aparece, insira o valor que deseja preencher na célula em branco selecionada e clique no botão OK botão. Veja a imagem:
Em seguida, o valor especificado é exibido na célula selecionada imediatamente. E ao desmarcar a caixa de seleção, a célula ficará em branco.
Note: Este código irá lembrá-lo de inserir o valor do texto circularmente quando você marcar a caixa de seleção a cada vez.
Alterar uma cor de célula especificada quando a caixa de seleção estiver marcada com o código VBA
Esta seção mostrará como alterar uma cor de célula especificada quando a caixa de seleção está marcada com o código VBA.
1. Clique com o botão direito no Aba Folha com a cor da célula que você precisa alterar com base na caixa de seleção 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: alterar uma cor de célula especificada quando a caixa de seleção estiver marcada
Sub CheckBox1_Click()
Dim xRng As Range
Set xRng = Selection
If CheckBox1.Value = True Then
xRng.Interior.Color = vbRed
Else
xRng.Interior.Color = xlNone
End If
End Sub
Note: No código, Caixa de verificação1 é o nome do Caixa de seleção (controles ActiveX). Você pode alterá-lo conforme necessário.
3. Selecione uma célula da qual você precisa alterar sua cor de fundo e marque a caixa de seleção. Você pode ver que a cor de preenchimento da célula selecionada mudou para vermelho. E a célula selecionada será preenchida sem cor de fundo após desmarcar a caixa de seleção. Veja as capturas de tela:
Artigos relacionados:
- 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 marcar a caixa de seleção com base no valor da célula no Excel?
- 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 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!