Private Sub CheckBox1_Click()
If CheckBox1.Value = True Then
Range(“D2”).Value 1
Else
Range(“D2”).Value = 0
End If
End Sub5. Botões de opção
Tanto o Check Box quanto o Option Buttons são usados para fornecer opções aos usuários, mas existem diferenças importantes entre os dois:
| Característica | Check Box | Option Buttons |
| Função | Permite que os usuários escolham mais de uma opção | Apenas uma opção pode ser selecionada em um grupo |
| Tipo de entrada | Valor binário (Verdadeiro/Falso) | Opções exclusivas (apenas uma opção ativa em um grupo) |
| Usar | Usado para ativar/desativar recursos | Usado para escolher uma das várias opções |
| Exemplos de uso | Escolher recursos adicionais em um formulário | Escolha um gênero ou forma de pagamento |
Se o usuário precisar selecionar mais de uma opção, use Check Box. No entanto, se você puder escolher apenas uma das várias opções, use Option Buttons.
Etapas para criar um botão de seleção no Excel VBA
- Abra o Excel e ative a guia Developer.
- Selecione Developer > Insert > Option Button (ActiveX Controls).
- Clique e arraste para colocar dois Option Buttons na planilha.
- Clique com o botão direito do mouse em cada Option Button e selecione Properties.
- Renomeie (Name) para OptionButton1 e OptionButton2.
- Altere o Caption para “Masculino” para OptionButton1 e “Feminino” para OptionButton2.
- Para agrupar os dois botões, coloque-os em Frame (ActiveX Controls) ou no UserForm.
Exemplo de código VBA para conectar chaves seletoras com células
O código a seguir armazenará uma seleção do Option Button na célula D3 de acordo com a escolha do usuário:
If OptionButton1.Value = True Then Range(“D3”).Value “Male”
If OptionButton2.Value = True Then Range(“D3”).Value “Female”Para garantir que esse código seja executado automaticamente quando o usuário clicar no botão, use os seguintes eventos do VBA:
Private Sub OptionButton1_Click()
Range(“D3”).Value =“Male”
End Sub
Private Sub OptionButton2_Click()
Range(“D3”).Value =“Female”
End SubCom este código, D3 células serão atualizadas automaticamente de acordo com as escolhas feitas pelo usuário.
Outros artigos interessantes
6. Botão de rotação
Spin Button é um controle usado para aumentar ou diminuir o valor numérico em uma célula gradualmente. Isso é especialmente útil para entradas numéricas, como definir o número de mercadorias, taxas de juros ou outros parâmetros que tenham limitações de valor.
Como definir os valores máximo e mínimo no botão de rotação
- Abra a guia Developer no Excel.
- Clique em Insert > Spin Button (ActiveX Controls).
- Clique e arraste para colocar o Spin Button na planilha.
- Clique com o botão direito do mouse no Spin Button e selecione Properties.
Exemplo de código VBA para definir o botão de rotação
Use o código a seguir para definir o limite de valor Spin Button:
SpinButton1.Max = 100
SpinButton1.Min = 0Para conectar Spin Button com células no Excel, use o seguinte código:
Private Sub SpinButton1_Change()
Range(“C3”).Value = SpinButton1.Value
End SubEsse código garantirá que toda vez que o usuário pressionar a tecla Spin Button, os valores na célula C3 serão alterados de acordo com os valores definidos nos controles.