Notifications
Clear all

atualizar cor do botao

6 Posts
3 Usuários
0 Reactions
1,419 Visualizações
(@xandao6)
Posts: 20
Eminent Member
Topic starter
 

Tenho uma planilha que possui um botão1 que abre um formulário. Se possuir texto no formulário o botão muda de cor, se apagar o texto a cor volta para o normal.
Vermelho com texto, amarelo sem texto.

Então, criei outro botão2. Esse botão2 serve para limpar diversas celulas, inclusive as do formulário(as do formulário ficam em outra planilha.).

Até ai tudo bem, o problema:
O formulário está com texto, o botão1 está vermelho.
Eu clico no botão2 e o texto do formulário é deletado, no entanto, o botão1 continua vermelho.

*Minha tentativa para resolver: um código VBA no botão2(o código está no "Módulo 2") que chame(Call) o botão1(o código está na "Planilha 1 (BASE)" ) e feche ele em seguida, apenas para atualizar.
Eu não consegui fazer o call do código do Módulo para o código da planilha.

*A planilha está gigantesca para eu postá-la.

 
Postado : 01/09/2016 4:48 pm
(@edivan)
Posts: 119
Estimable Member
 

Bom a grosso modo após deletar o formulário escreva o código para alterar a cor do botão

botaoX.Forecolor = corX (isso altera a cor da fonte)

botaoX.BackColor = corX (isso altera o fundo do botão)

é só você colocar a cor desejada...

 
Postado : 01/09/2016 7:53 pm
(@xandao6)
Posts: 20
Eminent Member
Topic starter
 

Coloquei lá no Modulo "CommandButton15.BackColor = RGB(255, 255, 0)"

Deu erro 424, lembrando que esse CommandButton15 está com o código na planilha "BASE"

 
Postado : 01/09/2016 8:07 pm
(@rafaelp)
Posts: 89
Trusted Member
 

Bom dia!

Segue planilha anexa, veja se lhe atende.

Tenho uma planilha que possui um botão1 que abre um formulário. Se possuir texto no formulário o botão muda de cor, se apagar o texto a cor volta para o normal.
Vermelho com texto, amarelo sem texto.

Então, criei outro botão2. Esse botão2 serve para limpar diversas celulas, inclusive as do formulário(as do formulário ficam em outra planilha.).

Até ai tudo bem, o problema:
O formulário está com texto, o botão1 está vermelho.
Eu clico no botão2 e o texto do formulário é deletado, no entanto, o botão1 continua vermelho.

*Minha tentativa para resolver: um código VBA no botão2(o código está no "Módulo 2") que chame(Call) o botão1(o código está na "Planilha 1 (BASE)" ) e feche ele em seguida, apenas para atualizar.
Eu não consegui fazer o call do código do Módulo para o código da planilha.

*A planilha está gigantesca para eu postá-la.

 
Postado : 02/09/2016 7:03 am
(@xandao6)
Posts: 20
Eminent Member
Topic starter
 

Amigo quase, mas o botao que muda de cor está na planilha!
Segue um exemplo de anexo!!

 
Postado : 02/09/2016 11:00 am
(@xandao6)
Posts: 20
Eminent Member
Topic starter
 

ai em cima

 
Postado : 02/09/2016 11:07 am