Notifications
Clear all

For loop

6 Posts
1 Usuários
0 Reactions
890 Visualizações
Fernando Fernandes
(@fernandofernandes)
Posts: 43750
Illustrious Member
Topic starter
 

Prezados,

Boa tarde!

Sou iniciante em Vba e criei a seguinte macro:

Sub Teste()
Dim i As Integer
For i = 2 To 26
If Range("a" & i) = "a" Then
Range("a" & i).Interior.ColorIndex = 3
End If
If Range("a" & i) = "g" Then
Range("a" & i).Interior.ColorIndex = 6
End If
Next i
End Sub

Quando procuro "a" na primeira coluna a celula fica marca e tbm quando procuro "g", quero executar esta macro trabalhando com um intervalo maior de células e copiar o valor encontrado para a "plan 2", como é possivél realizar este trabalho?

Grato.

Existem mil maneiras de preparar Neston. Invente a sua!
http://www.youtube.com/ExpressoExcel

 
Postado : 19/09/2012 11:08 am
Fernando Fernandes
(@fernandofernandes)
Posts: 43750
Illustrious Member
Topic starter
 

Boa noite, Cara seguindo teu codigo fiz o que entedi pelo seu algoritimo, dei uma melhorada no codigo, mais tava bacana!, da uma olhada no anexo e se nao for o que deseja
favor comentar.

att MarkoSoftware

Existem mil maneiras de preparar Neston. Invente a sua!
http://www.youtube.com/ExpressoExcel

 
Postado : 19/09/2012 2:36 pm
Fernando Fernandes
(@fernandofernandes)
Posts: 43750
Illustrious Member
Topic starter
 

Perfeito markosoftware, agora somente uma dúvida se eu quiser trabalhar com esses valores em mais de uma coluna não somente na "A", mas tbm na "B", "C" e "D'' como buscaria esses valor nestas 4 colunas?

Grato.

Existem mil maneiras de preparar Neston. Invente a sua!
http://www.youtube.com/ExpressoExcel

 
Postado : 20/09/2012 10:54 am
Fernando Fernandes
(@fernandofernandes)
Posts: 43750
Illustrious Member
Topic starter
 

Cara e simples, mais ficou meio vago o pedido, voce quer q ele encontre o "a" ou o "g" e trasfira a linha referente a essas letras ? ou voce quer que ele faca aleatorio tipo, procure o "a" ou "g" na coluna A e faca a mesma busca na coluna B procurando o "a" ou "g" ? independente de linha ?

Existem mil maneiras de preparar Neston. Invente a sua!
http://www.youtube.com/ExpressoExcel

 
Postado : 20/09/2012 2:47 pm
Fernando Fernandes
(@fernandofernandes)
Posts: 43750
Illustrious Member
Topic starter
 

Segue com base na logica dita por voce.

att Espero ter ajudado. qualquer coisa da o toque! se for o que queria, e so implementar no codigo anterior!

att

Existem mil maneiras de preparar Neston. Invente a sua!
http://www.youtube.com/ExpressoExcel

 
Postado : 20/09/2012 3:03 pm
Fernando Fernandes
(@fernandofernandes)
Posts: 43750
Illustrious Member
Topic starter
 

markosoftware,

Mais uma vez perfeito, para min está resolvido, muito obrigado!

Grato.

Existem mil maneiras de preparar Neston. Invente a sua!
http://www.youtube.com/ExpressoExcel

 
Postado : 20/09/2012 5:03 pm