vilc,

Bom dia!

Veja se é assim.

Estoo movendo seu tópico para a área apropriada (VBA & Macros).

só quando tirar o mouse ele voltar pra cor normal.

Uma observação: Tem como fazer isso no TextBox dentro de um UserForm também? Só que teria que voltar para a cor original quando tirasse o mouse de cima.

leandroxtr,

Sim.

No exemplo anexo, tem as duas formas: No retângulo na planilha e no TextBox no Userform. Aproveitando o ensejo, inseri, tanto na planilha quanto no userform, os valores de X e de Y para quando os mesmos serão verdadeiros no comando IF. Isso serve para que você possa determinar qual é o tamanho do seu objeto pois pode precisar desenhar os objetos em outros tamanhos que não os que desenhei no exemplo.

Outro detalhe é quando a questão de voltar a cor normal após tirar o mouse de cima dos objetos. Isso está ocorrendo normalmente, todavia, existe um pequeno retardo no processamento da instrução e, se o movimento do mouse for rápido, observei também aqui que a cor não volta ao normal. Para testar, passe o mouse em cima dos objetos e tire devagar o mesmo de cima dos objetos, em qualquer das direções.

Muito maneira essa rotina.
Quanto mais aprendo, mais percebo que tenho coisas pra aprender.
Infelizmente esse precedimento não é muito eficaz, exatamente por causa dessa questão de tirar o mouse rápido do objeto, uma vez que na maior parte do tempo estamos correndo com o mouse pra lá e para cá.
No mais, muito obrigado pela explicação!

esse retângulo vai servir de botão para uma macro, quando o mouse passar por cima, fundo fica de outra cor, ou aumentasse o fundo, dando destaque.