Toggle cor do botao de comando no Excel?

Ok, então eu estou trabalhando em uma folha de caixa de seleção que tem que ser prático para o uso em um tablet. Decidi que quero usar o botão de comando como a minha caixa de seleção. Gostaria que o botão para mudar entre verde, amarelo e vermelho em cada clique indefinidamente. Alguém pode me fornecer um script em VBA ou algumas instruções? Obrigado.

Resposta

Presumo que se o botão de comando vermelho quando clicado que desejar mudar para verde. Se assim for, aqui está uma maneira de fazer o que quiser.

Inserir um botão de comando do ActiveX para a planilha desejada. (Na barra de ferramentas caixa de ferramentas de controle no Excel 2003 e anteriores - do desenvolvedor guia > Inserir > controles ActiveX no Excel 2007 e posterior).

Botão direito do mouse no botão de comando e selecione Propriedades.

Exclua a entrada de legenda, em Propriedades, se você deseja no botão para ver sem legenda, ou altere a propriedade Caption para a seqüência de texto que você deseja.

Role para baixo à propriedade de 'Tomar o foco na Click' e alterá-lo para False.

Dê um duplo clique no botão de comando e excluir o padrão 'CommandButton1_Click () e End Sub' linhas.

Copie e cole o seguinte manipulador no lugar das linhas excluídas acima:

Private Sub CommandButton1_Click()

Se Me.CommandButton1.BackColor = & HC000 & então

Me.CommandButton1.BackColor = & H80FFFF

ElseIf Me.CommandButton1.BackColor = & H80FFFF então

Me.CommandButton1.BackColor = & HFF &

ElseIf Me.CommandButton1.BackColor = & HFF & então

Me.CommandButton1.BackColor = & HC000 &

End If

End Sub

Sair do modo de Design.

Clicando no botão irá redefinir a propriedade BackColor, na seqüência que você indicou, com cada evento Click.