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)