Saberexcel - o site de quem precisa aprender macros microsoft excel vba

Prezados amigos,
Este exemplo de planilha contendo a instrução (For...Next) busca por determinada palavra na coluna(A) e a substitui por outra,
no exemplo substitui, mas voce pode fazer o que bem desejar, deletar a linha, a célula, inserir cores da fonte ou cor interior da célula,
enfim é só usar a criatividade e executar o macro.  Baixe o exemplo de planilha no final da página. Fiquem com Deus. Expedito Marcondes.
'- - - - - - - - - - - - - - - - - - - - - -'
Este exemplo faz parte de nossas 120 planilhas Treinamento com Loops
Sub sbx_localizar_palavra_substituir_por_outra()
 Dim vResultado As Boolean
 Dim vContador As Long
 Ultima_Linha = Range("A65536").End(xlUp).Row
 
  For i = 1 To Ultima_Linha
    Range("A" & i).Select
    vResultado = Range("A" & i).Value Like "*Saberexcel"
   
    If vResultado Then
       Range("A" & i).Value = "Curso_VBA_Saberexcel"
       vContador = vContador + 1
    End If
 
  Next
 MsgBox "foram encontradas [ " & vContador & " ] resultados ", vbInformation, " Saberexcel - o site das macros"
 [c1].Select
End Sub
'- - - - - - - - - - - - - - - - - - - - - -'
Sub sbx_copiar_teste()
[a].Copy [b]
MsgBox ("Dados copiados para o teste"), vbInformation, "Saberexcel - o site das macros"
End Sub
'- - - - - - - - - - - - - - - - - - - - - -'

EXCELENTE MATERIAL PARA TREINAMENTO E ESTUDOS COM PROGRAMAÇÃO MS EXCEL VBA
São 120 exemplos de planilhas para treinamento com programação - excelentes exemplos de planilha.
com as instruções..

\While...Wend\Do...While...Loop\Do...Loop...While\Do...until..Loop\Do...Loop...until\For...Next\For...Each...next
'--------------------'
1 - INSTRUÇÃO: WHILE...WEND
  - Enquanto ... Faça Loop Wend Enquanto a condição for atendida,
    o loop novamente
'--------------------'
2 - INSTRUÇÃO: DO...WHILE...LOOP
  - Enquanto ... Loop Wend Enquanto a condição for atendida,
    o loop é executado
'--------------------'
3 - INSTRUÇÃO: DO...LOOP...WHILE
  - Loop Do ... Loop While O loop é executado,
    em seguida, repita até que a condição é satisfeita
'--------------------'
4 - INSTRUÇÃO: DO...UNTIL..LOOP
  - Loop Do Until ... Loop Até que a condição é alcançada,
    o loop é executado
'--------------------'
5 - INSTRUÇÃO: DO...LOOP...UNTIL
  - Loop Do ... Loop Until
    O loop é executado, então se repete até que a condição for atendida
'--------------------'   
6 - INSTRUÇÃO: FOR...NEXT
    Instrução Loop - Repete uma série de instruções de um número de vezes

7 - INSTRUÇÃO: FOR..EACH...NEXT
    O laço For Each ... Próximo
    Repete um bloco de instruções para cada objeto em uma coleção
    ou cada elemento de um array

'- - - - - - - - - - - - - - - - - - - - - -
'\WHILE...WEND\DO...WHILE...LOOP\DO...LOOP...WHILE\DO...UNTIL..LOOP\DO...LOOP...UNTIL\FOR...NEXT\FOR..EACH...NEXT
'- - - - - - - - - - - - - - - - - - - - - -'

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.



  baixe o exemplo de planilha contendo o macro acima - procura palavra
Excel planilha vba localizar e substituir palavras (24.65 KB)