[Resolvido]Mudar a cor de fundo de um botão no formulario a cada clique

Pessoal,

Minha pergunta é um pouco banal, mas eu estou sem saber como fazer.

Eu tenho um botão de cor azul no meu formulário e eu quero que ao clicar ele mude sua cor para vermelho, até ai tudo fácil, é so colocar no evento ao clicar do botão, o que se segue:

btn01.BackColor = RGB(255, 0, 0)

mas eu queria que se eu clicasse novamente no mesmo botão, ele assumisse a cor original ou seja, cor azul. A cor vermelha seria para marcar o botão ou indicar que ele foi clicado. Sei que eu poderia criar uma variavel que funcionasse como uma flag, mas não me vem a mente como fazer isso.

obrigado a todos

Não seria melhor deixar ele vermelho enquanto mantivesse o foco e voltar à cor original quando clicasse em outro elemento? Aí você poderia usar os eventos "Ao receber foco" e "Ao perder foco". Agora, se quer que seja mesmo dessa forma, basta usar um If:

Código:

If Cor = Cor1 Then
    Cor = Cor2
Else
    Cor = Cor1
End If

Criquio,

A cor de fundo original do botão é: #D6DFEC como eu atribuiria essa cor a variavel?

por exemplo:

btn01.backcolor so aceita se eu colocar assim: btn01.backcolor = RGB(255,0,0) que seria a cor vermelha

btn01.backcolor = #D6DFEC ou a "#D6DFEC" não é aceito.

Faça um teste assim:

MsgBox Me.NomeDoBotão.BackColor

Já consegui, na janela de propriedades dar cor de fundo, basta vc clicar na opção mais cores, que ele mostra a paleta e seu respectivo codigo em RGB.
Obrigado.

Grato pelo retorno. O fórum agradece.

Ainda deixo como dica fazer o que falei para perceber outras formas de passar a cor pelo VBA, como por exemplo:

Me.txtNome.BackColor = RGB(255, 0, 0)
Me.txtNome.BackColor = 255
Me.txtNome.BackColor = vbRed

Todas as três formas colocam a cor vermelha como fundo do campo txtNome. Se você colocar um campo com a origem [txtNome].[BackColor], verá que será exibido o valor 255 para todas essas variações do VBA.