Notifications
Clear all

Macro Para Colorir um botao quando ele for clicado

5 Posts
1 Usuários
0 Reactions
1,534 Visualizações
(@fernandofernandes)
Posts: 43750
Illustrious Member
Topic starter
 

Pessoal, preciso da ajuda de vcs, tem um formulario com varios botoes CommandButton, gostaria que quando eles fosse clicados eles mudasse de cor, tipo mudasse para roxo com fonte branco, e quando vc clicado de novo voltasse para o padrão. Se alguem puder ajudar fico grato.

 
Postado : 28/10/2011 2:35 pm
(@fernandofernandes)
Posts: 43750
Illustrious Member
Topic starter
 
Private Sub CommandButton1_Click()
If Me.CommandButton1.BackColor = &H8000000F Then
        Me.CommandButton1.BackColor = &HFF8080
        Me.CommandButton1.ForeColor = &HFFFFFF
    Else
        Me.CommandButton1.BackColor = &H8000000F
        Me.CommandButton1.ForeColor = &H80000012
End If
End Sub
 
Postado : 29/10/2011 7:48 am
(@fernandofernandes)
Posts: 43750
Illustrious Member
Topic starter
 

Muito obrigado, funcionou perfeitamente

 
Postado : 29/10/2011 10:17 am
(@fernandofernandes)
Posts: 43750
Illustrious Member
Topic starter
 

Estando ao alcance disponha. ;)

 
Postado : 29/10/2011 2:02 pm
(@fernandofernandes)
Posts: 43750
Illustrious Member
Topic starter
 

Boa noite Sotextes

Vc esqueceu de clicar na mãozinha ao lado da ferramenta citar, pontuando o JoseA pela ajuda prestada.

Um abraço.

 
Postado : 29/10/2011 3:05 pm