Home Excel - Dicas Microsoft Excel VBA Excel VBA - Busca Palavras Excel planilha vba busca palavra total e substitui por outra palavra ou fórmula

Excel planilha vba busca palavra total e substitui por outra palavra ou fórmula

E-mail Imprimir PDF

Saberexcel - site das macros

Essas macro do Aplicativo Microsoft Excel VBA(Visual Basic Application), quando eu era um moderador de um Fórum um participante precisou de uma macro que localizasse a palavra "Total" na coluna(D), porém precisaria também de uma outra macro para localizar e substituir a palavra total por Trp  - isso mesmo, Sr. Marcondes. obrigado.

Bom, .... Essa macro abaixo busca na coluna(I) as ocorrencias da Palavra Total e substui por "Saberexcel"
observe que a macro busca somente até a linha I20, portanto fica uma sem modificar.


Vamos às macros,
Alguns procedimentos e macros veja abaixo.

Private Sub CommandButton1_Click()
Acesso Livre - Registrados (REGISTRE-SE!)
End Sub


Private Sub CommandButton2_Click()
Acesso Livre - Registrados (REGISTRE-SE!)
End Sub


Sub Procurar_por_palavra_total()
Acesso Livre - Registrados (REGISTRE-SE!)
End Sub

Sub Procurar_por_palavra_total_II()
Acesso Livre - Registrados (REGISTRE-SE!)
End Sub




Aprenda tudo sobre o Aplicativo Microsoft Excel VBA(Visual Basic Application), sozinho, com baixo custo, praticando com os produtos didáticos SaberExcel



Acesso Livre - Registrados (REGISTRE-SE!)
 Baixe o exemplo de planilha contendo as macros e procedimentos acima
vba busca procurando blocos palavra total (38.54 KB 2011-02-05 23:25:58)

 

Última atualização em Qua, 10 de Agosto de 2011 08:13  

Comentários   

 
Guest
# Guest 17-08-2012 21:31
como gerar um comando par substituir os dados da minha planilha
Responder | Responder com citação | Citar
 
 
Guest
# Guest 14-09-2012 12:11
Rodrigo, geralmente usamos uma Insdeusepaição For...Next, a mais usada,
com a condição if para analisar cada item da linha e substituiir ou deletar, colorir, sublinhar, copiar, colar, .....etc...
se encontrar então é possível fazer qualquer coisa,
como disse pode usar o Insdeusepaição Loops (For...Next), Do Loop, do While,
Wlhile Wend, Do Loop Untl, For each next para toda a região,
o Caminho é este, mas se quiser envie-me sua planilha, para analisarmos
e ajudá-lo, fique com Deus, Expedito Marcondes}

For i = 1 to Range("A" & Rows.count).end (xlup).row ' Ultima Linha
If Range("A"& cstr(i).value = Range("B" & cstr(i) then
Range("A" & Cstr(i).value = "item desejado"
End if
Next i
' um pequeno exemplo do uso da indeusepaição For...next com condição If.
para se fazer qualquer coisa, (Copiar, colar, deletar, substituir, colorir, enviar para outra coluna, outra planilha, qualquer coisa.
Fique com Deus, Expedito Marcondes
Responder | Responder com citação | Citar
 

Adicionar comentário

"Jamais considere seus estudos como uma obrigação, mas como uma oportunidade invejável para aprender a conhecer a influência libertadora da beleza do reino do espírito, para seu próprio prazer pessoal e para proveito da comunidade." Albert Einstein


Código de segurança
Atualizar


Google Associados

Depoimentos

Adicione Saberexcel Favoritos

 
 

Aprenda tudo sobre o Aplicativo Microsoft Excel VBA

Aprenda tudo sobre o Aplicativo Microsoft Excel VBA(Visual Basic Application), sozinho, com baixo custo, praticando com os produtos didáticos Saberexcel,


   Sobre as WorksheetFunctions Funções de Planilhas que retornam valores do VBA