Escola Saberexcel VBA Estudos® – Treinamentos com Macros, Fórmulas e Funções
Excel VBA Planilha cor moeda instr busca cifrão strconv
Este Macro do Aplicativo Microsoft Excel VBA(Visual Basic Application), Através de uma instrução for next e condição If, vamos percorrer todas as linhas, e usando a Função Instr(), vamos localizar a posição na frase onde ocorre o carácter cifrão, vamos colorir os valores moedas em vermelho ‘que é o restante’. ‘—- poderia se usar aqui uma função Extrair Número, e colorir também funciona.
‘//=================’
Sub sbx_colorir_caracter_numerico()
For vLin = 7 To Cells(Rows.Count, “e”).End(xlUp).Row
t = InStr(Cells(vLin, “e”), “R$”)
If t = 0 Then vLin = vLin + 1
Cells(vLin, “E”).Characters((t – 1), Len(Cells(vLin, “E”))).Font.ColorIndex = 3
Next vLin
[e5].Value = StrConv([e5], vbUpperCase)
End Sub
‘//=================’
Sub sbx_limpar_teste()
Set f2 = Planilha2
Set f1 = Planilha1
X = f2.Cells(Rows.Count, “a”).End(xlUp).Row
f2.Range(“A2:A” & X).Copy f1.[e7]
[e5].Value = StrConv([e5], vbLowerCase) ‘somente para treinamento é assim que uso para letras maiúsculas, minúsculas e próprias
End Sub
‘//=================’
‘Escola SaberExcel VBA Estudos
‘http://www.saberexcel.com.br
‘[email protected]
![](https://escola.saberexcel.com.br/wp-content/uploads/2013/08/linazul.jpg)
Aprenda tudo sobre planilhas do Aplicativo Microsoft Excel VBA(Visual Basic Application), sozinho, com baixo custo, praticando com os produtos didáticos
Escola Saberexcel VBA Estudos® – Treinamentos com Macros, Fórmulas e Funções.
u – Promoção: Aquisição do Curso Excel VBA Expert Completo
Pague pelo PayPal | Pague pelo PagSeguro | |
![]() |
![]() |
|
Relação de Nosso Material didático Área de membros:
Baixe o exemplo de planilha contendo os macros acima:
[email-download-link namefield=”YES” id=”251″]
![](https://escola.saberexcel.com.br/wp-content/uploads/2019/11/5578ce509e25423b9fa175a8b5c066e2-440x268.jpg)
Escola SaberExcel VBA Estudos