Microsoft Visual Basic for Applications (VBA) permite aos programadores utilizar diferentes objetos de controle sobre as formas de usuários. O objeto pode corresponder a caixa, imagem , barra de rolagem ou um botão de controle. Um botão de alternância em um formulário é um controle usado para exibir um valor " Yes /No" a partir de uma fonte de dados. Os desenvolvedores de software usam botões de alternância em um grupo de opção com outros botões e caixas de diálogo para aceitar a entrada do usuário . Quando você clica em um objeto botão de alternância , parece ser pressionado ou empurrado para baixo. Você precisa obter o valor de um controle botão de alternância , a fim ativar o botão de alternância em VBA. Instruções
1
Clique no botão "Iniciar " do Windows e selecione a opção " Microsoft Excel " no menu " Todos os programas " para abrir um novo livro.
2
Click "Ferramentas ", "Macro" e "Editor do Visual Basic" .
3
Clique em "Inserir ", depois " UserForm " para inserir um formulário de usuário em sua pasta de trabalho.
4
Adicione o " ToggleButton " e controles " label" no formulário de utilizador.
5
clique duas vezes no controle " ToggleButton " para abrir a janela "Código" para o controle ToggleButton .
6
Digite o seguinte código para o " evento ToggleButton1Click :
Private Sub ToggleButton1_Click ()
Se ToggleButton1.Value = True Then
'Definir fundo UserForm para vermelho.
Me.BackColor = RGB (255, 0, 0)
Else
' Definir fundo UserForm para azul.
Me.BackColor = RGB ( 0, 0, 255)
End If End Sub
7
Clique no botão " Run Sub /UserForm " no menu " Run" para ativar o botão de alternância em seu controle VBA.