VBA Código Mudar Cor

[jcgmcs]

Boa tarde pessoal!!

 

Preciso de ajuda pra fazer o seguinte, Tenho na coluna K as palavras:

 

Cliente negativo

Pedido fechado

Agendar visita

Cotação enviada

Cliente inativo

 

Ambas, se repetem muitas vezes em toda a coluna. Bem, quero que com um código vba, as palavras mudem de cor automaticamente conforme inclusões adiantes.

 

Cliente negativo

Pedido fechado

Agendar visita

Cotação enviada

Cliente inativo

 

 

OBs: Meu Excel é 2003

 

No aguardo e

Grato a todos

[vagnersouza1976]

jcgmc,

 

Bom dia !!!

 

Veja se atende:

 

Link: https://www.sendspace.com/file/anbdbl

 

*** Tabela de cores da propriedade colorindex

 

http://alexanderlima.com/excel-vba-tabela-de-cores-da-propriedade-colorindex/

 

De retorno.

[jcgmcs]

Vagner, brigadaum colega!!

 

Demoro mas enfim uma Luz!!! Rsss

tão testei e funcionou perfeitamente, mas será que teria como deixar automático, tipo teclar Enter e já mudar a cor??

 

No aguardo...

[vagnersouza1976]

jcgmc,

 

Boa tarde !!!

 

Vamos lá, primeiramente precisamos entender o que você realmente necessita...

 

Porque as vezes uma formatação condicional já resolveria o seu problema e não seria necessário utilizar o VBA ...

 

Portanto, disponibilizar uma planilha exemplo e informe nessa planilha o resultado esperado ...

[jcgmcs]

Boa tarde Vagner,

 

o que preciso era disso mesmo tndeu!! Como já disse, funcionou perfeitamente.

A questão, é se seria possível fazer funcionar automático, sem precisar do botão.

Quanto a Condicional, meu Excel é 2003 e suporta apenas 3 condições. Minha coluna real há outras palavras que tbém quero deixar com outras cores tndeu!!

 

No aguardo...

[vagnersouza1976]

Utilize esse novo arquivo ...

 

Link: https://www.sendspace.com/file/taey8s

 

Ctrl + Q (de Queijo) atualiza a macro ...

 

Dê retorno.

[Patropi]

Boa tarde jcgmc

 

Adaptei o código como solicitado.

 

Para testar, redigite um dos textos e dê ENTER

 

12_11_14_Mudar Cor VBA sem botão-Patropi.zip

 

Dê retorno.

 

Se a resposta foi útil, clique em Curtir

 

[]s

 

[jcgmcs]

Muito obrigado Vagner e Patropi, ficou ótimo!!

Mas agora, será que vocês poderiam me ajudar com este Post, há dias estou esperando por uma Luz!!!!

Código para Pop-Up

[vagnersouza1976]

jcgmc,

 

Bom dia !!!

 

Para este tópico, precisando estamos aí ...

 

Para o outro tópico, fico devendo ...

 

Sem mais ...

[Patropi]

jcgmc

 

Quanto a este tópico, se as respostas foram uteis clique no botão Curtir e se a dúvida foi sanada clique no botão Resolvido para dar o tópico como Resolvido.

 

Sobre o outro tópico não sei como resolver e acho que falta informações pois os feras em VBA como O Osvaldo não sugeriram nada.

 

[]s

[jcgmcs]

Rsssss

Agradeço e muito a vocês, mas

Pois ée nehh!! nem o Osvaldo!!!

O objetivo é simples. Seria +/- como adiconar comentário com imagem, só que com celula. Eu quero fazer é uma espécie de prewiew da celula que fica láaaa nos cafundóoo da planilha. Rsssssss

Em vez de eu ir até lá só pra verificar o que está escrito, eu com essa preview na coluna K, facilitária e muito, ver o que está lá em FT tndeu!!

 

No aguardo...

valeu!!

[vagnersouza1976]

jcgmc,

 

Boa tarde !!!

 

Nem o Osvaldo e nem o Basole que também considero outro fera no VBA ...

 

Em cima do seu comentário: "prewiew da celula que fica láaaa nos cafundóoo da planilha" ... fiz uma "brincadeirinha" com Hiperlink ...

 

Veja no outro tópico e dê retorno ...

 

*** Não esqueça de curtir e clicar em resolvido na melhor resposta e finalizar esse tópico ...

 

Um abraço.

[jcgmcs]

Vagner / Patropi, Bom Dia!!

 

No anexo abaixo, o código funciona perfeitamente na coluna, mas solicito sua ajuda novamente, pra uma segunda opção de Mudar Cor, as palavras que estão em várias colunas.

Ex: De AP5 à BK999, tenho linhas com longas escritas (Históricos) e preciso mudar a cor do nome das pessoas tipo os exemplos abaixo:

Porteiro disse Fabrício Assumpção estar viajando e retornará só sexta feira

Sr. Norberto disse, apenas intermediando contato

Rosana disse, José Geraldo irá nos adquirir como fornecedor.

 

Bem, acho que deu pra entender né!!

Brigadaummmm T++

Mudar Cor - VBA (Teste Ok).xls

[jcgmcs]

Bom Dia!!

Ajuda aos colegas...

 

Tenho um módulo com este código abaixo, que ao selecionar colunas, faz o que promete, porém com uma deficiencia. Ele não destingue palavras específicas como desejado.

Ex: Seu eu tiver em 10 colunas, as palavras "Teste Aprovado" e "Teste/Aprovado" ele altera as cores nas duas opções e não só apenas em "Teste" ou "Aprovado"

 

Option Explicit

'Procura pela palavra “Teste” em qualquer parte da célula e altera cor de fundo para amarelo
Public Sub ProcuraPalavraTeste()

    Dim cell As Range
    
    'Itera pelo range
    For Each cell In Selection
   
        If cell.Value Like "*Teste Aprovado*" Then
            cell.Interior.ColorIndex = 6
            cell.Font.ColorIndex = 3
        End If
    
                 
    Next cell

End Sub

[jcgmcs]

Aguardando....

[jcgmcs]

Me ajudaee pessoal!!!